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Preface 


The information in this publication is of 
particular interest to anyone responsible 
for the planning and/or implementation of 
system generation and maintenance for DOS. 
This includes installation managers, system 
analysts, programmers, and machine 
operators. 

Familiarity with the following system 
programs and facilities is invaluable when 
using this publication: 

• the control programs (supervisor, jcb 
control, and IPL) , 

• the system service programs (linkage 
editor and librarian) and 

• the Input/Output Control System (IOCS) 
logic modules. 

The control program and the system 
service programs are described in the 
S ys tem Control and S e rv ice publication. 

The IOCS logic modules are described in the 
S upe r viso r and I/ O Macros publication. In 
addition, the DOS Versi on 4 manual should 
be consulted for those features of DOS 
which are new with Version 4. 


The storage estimates given in this 
publication are within 15% of actual 
requirements. 


MODULAR ORGANIZATION OF THIS MANUAL 

This publication is in a modular format 
that enables you to discard unwanted 
modules and to insert system generation 
modules from program product documents. 
Thus, you can tailor your system generation 
document for your installation. 

Although the pages are numbered 
consecutively throughout the book, each 
module is a self-contained document. A 
numbered tab on the right-hand edge of the 
page indicates the beginning of each new 
module. Each module has a M odule O utline 
and, where length warrants, a Mcd ule In dex. 

The total publication has a General 
C ontent s and a General In dex . These refer 
you to the individual module numbers. 

Figure numbers throughout the publication 
are in the form: Figure 1-3, where 1 is 


the module number and 3 is the figure 
number within the module. 

Each mcdule in this publication is a 
collection of information about a 
particular component or related topics. 

The modules, numbered 1-35, are grouped as 
fcllcws: 

• Mcdule 1: Planning and procedures 
information 

• Modules 2, 3: Emulator programs 

• Modules 4-11: I/C components 

• Modules 12-23: Languages 

• Modules 24-26: Sort/merge programs 

• Mcdule 27: System aids (CLTEF) 

• Modules 28, 29: Teleprocessing 

• Modules 30-35: Utilities 

Information contained in the appendixes 
cf previous editions is new located as 
follows. Three are located in Module 1: 

1. IPL C ontr o l and ASSGN State ments 

2• DO S S ystem/370 D is tri bu t io n Pr ogra m an d 
BPS M essag es 

3• O pt i mum Assignments cf work fi les 

The other two appendixes: Maste r Ma cro 
L is t and Ma st er Transie n t Lis t have been 
deleted, but the components still contain 
this information. The macros and 
transients are listed in the Genera l In dex . 

Individual library block counts for 
preassembled IOCS modules, subroutines, and 
macros have been deleted. Tc obtain this 
information, execute the DSERV program with 
the sort operation. 


Closely related publications are: 

D OS V ersion 4 , 3C33-5007 

D CS System Pr o gram me r's Gui de, GC24-5073 

IBM S ys te m/ 3 60 B as ic Progra mm ing Su pport , 
Distribut io n Pro gr am Spec if ication s and 
O pe ratin g G uid e, GC21-50C1 




















I BM Syste m/ 360 Basic Programming S upport, 
D ASE Utility P rograms Operating Gu id e, 

GC 2 4-3 3 92 . 


DO S and T QS Utility Progr ams, GC24-3465 

I BM S yste ni /360 Basic Prograrr irin g Sup port, 
D ASD Util ity P rograms Spe c ifi ca ti ons, 
GC24-3363 


References are made in this publication 
to the following: 

D OS BTA M, GC30-5001 


QTAM Mes sage C o ntrol Progra m, GC30-5004 


IBM Syste ir/360 Dis k a nd T ape O pe ra tin g 
Sys tems, COBOL Prog ra mmer 's Guide, 
GC24-5025 


IBM Sys tem/36 0 Dis k Ope rati ng System, 
F OR TR AN I V Pr og ramm e r's G ui de, GC24-6397 


1 401 / 14 40 /1460 D OS E mu l ator c n Model s 
135/1 45/155 , GC33-2004 

141 0/ 7010 DOS Emula t or on Models 145 /1 55, 
GC33-2005 
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modules, number of 69 
phases, number of 69 
data cell to printer 

core image library blocks 69 
modules, number of 69 
phases, number of 69 
data cell to tape 

core image library blocks 69 
modules, number of 69 
phases, number of 69 
DATE 33 
DEC 31 

decisions and considerations 22 
DECK 32 
DELETECL 72, 89 

DELETERL 72, 89 

DELETESL 72, 89 

deleting entries and merging libraries 94 
DIMOD 

main storage requirements 178 

directory capacities, system 78 

DISK 39 
disk sort/merge 

core image library blocks 68 
IBM program number 68 

modules, number of 68 

phases, number of 68 
relocatable library blocks 68 
disk to card 

core image library blocks 69, 70 
modules, number of 69, 70 
phases, number of 69, 70 
disk to data cell 

core image library blocks 69 
modules, number of 69 
phases, number of 69 
disk to disk 

core image library blocks 69, 70 
modules, number of 69, 70 
phases, number of 69, 70 
disk to printer 

core image library blocks 69 
modules, number of 69 
phases, number of 69 
disk to tape 

core image library blocks 69, 70 
modules, number of 69, 70 
phases, number of 69, 70 
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distributed volumes 83 
distribution program 100 
distribution program (BPS) messages 162 
DOS System/370 distribution program 
and BPS job control coding 
specifications 100 
DSERV 

core image library blocks 65, 174 
linkage edit statements 182 
module names 182, 
modules, number of 65, 174 
phase names 182 
phases, number of 65, 174 
DTFCD (define the file card), size of 
table 177 

DTFCN (define the file console) 179 
DTFDI (define the file device independent 
system units) 178 

DTFPH (define the file physical IOCS), size 
of table 179 

DTFPR (define the file printer), size of 
table 178 

DTFSR (define the file serial device), size 
of table 179 
DUMP 32 
DUMPGEN 

core image library blocks 65, 174 
linkage edit statements 189 
modules 189 

modules, number of 65, 174 
phases 189 

phases, number of 65, 174 
relocatable library blocks 65, 174 
DVCGEN macro 42 
DVCTYP 42 

emulator 30, 67 

end of supervisor macro instruction, 

SEND 45 

environmental recording, editing, and 
printing program (see EREP) 

EREP 

core image library blocks 70 
linkage edit statements 403 
module names 402 
modules, number of 70 
phase names 402 
phases, number of 70 
recorder file 82 
ERRLOG 30 
ERRS 3 2 

ESTVUT 

core image library blocks 65, 174 
linkage edit statements 188 
module name 188 
modules, number of 65, 174 
phase name 188 
phases, number of 65, 174 
EU (parameter) 30 
EVA (parameter) 34 
examples 

MERGE 93-97 

MNOTE resolutions 27 

supervisor 63 

system generation using one disk 127 

system generation using two disks 113 
system generation using volume 3 137 

system generation using 2314 140 

system generation using 3330 149 


file names and logical unit ident. for 
merge 97 
FOPT macro 33 
foreground save areas 39 
FORTRAN IV 

core image library blocks 67 
IBM-program number 67 

modules, number of 67 

phases, number of 67 
relocatable library blocks 67 
subroutines and storage 
requirement 67 
FORTRAN 

basic (see basic FORTRAN) 

FP 31 
F1PGR 40 
F2PGR 40 


general library updating techniques 92 
general system generation 
procedures 83, 85, 113, 127, 141, 149 
generated system volume 104 
creating a back-up tape of 
2311 and 2314 systems 104 
restoring the back-up tape to disk 105 
creating a back-up tape of 
a 3330 system 105 

restoring the back-up tape to disk 106 

I/O configuration, SYSGEN examples 
(2314) 141 

one disk 128 

two disk 116 

IBM-supplied 

core image library 21 
relocatable library 21 
source statement library 21 
IBM DOS distribution 83 
IBM 2311 workfile requirements 79 
IDRA 35 

initialize and restore programs 
bypass initialize disk 102 
initialize disk 101 
restore IBM tape to disk 103 
initialize data cell 

core image library blocks 69, 393 
phases, number of 69, 393 
initialize disk (distr. progr.and BPS) 
messages 163 
initialize disk 

core image library blocks 69, 393 
phases, number of 69, 393 
initialize tape 

core image library blocks 69, 70 
phases, number of 69, 70 
IOCS macros 175 

IOCS messages (distr. progr. and BPS) 
hardware errors 169 
10DEV 41 

IOTAB macro 40 
IPL 

core image library blocks 65, 174 

linkage edit statements 179 

module names 179 

modules, number of 65, 174 

phase names 179 

phases, number of 65, 174 


14 DOS Version 4 System Generation 



reason codes 30 
IT (parameter) 33 

JA 3 4 

JALIOCS 35 

JIB (job information block) 40 
Job Accounting Interface 34 
job control 

core image library blocks 65, 174 

linkage edit statements 180 

messages (BPS) 162 

module names 180 

modules, number of 66, 174 

phase names 179 

phases, number of 66, 174 

Kanji printer 23 

librarian programs 181 

library block size 74 

library sizes 74, 78 
LINES 32 

linkage editing or deleting IBM 
components 7 3 

linkage editor 

core image library blocks 66, 174 
linkage edit statements 180 


DTFCD 

177, 

175 

DTFCN 

179, 

175 

DTFDI 

178, 

175 

DTFPH 

179, 

175 

DTFPR 

178, 

175 

DTFSR 

179, 

175 

DUMP 

183 


DVCGEN 

42, 

183 

ENQ 

183 


EOJ 

183 


ERET 

175 


EXCP 

175 


EXIT 

183 


FEOV 

175 


FEOVD 

175 


FETCH 

182 


FOPT 

23, 148, : 

FREE 

175 


GET 

175 


GETIME 

183 


IJLQBFRD 183 

IJLQDSCT 183 

IJLQIP1D 183 

IJLQQCBD 183 

IJLQSTBD 183 

IJLQTSVC 183 

IJLQVECD 183 


module names 180 


IOTAB 

40, 183 

modules, number of 

66 , 174 

LBRET 

175 

phase names 180 


LINKEDIT 183 

phases, number of 

66 , 174 

LOAD 

183 

LIST 32 


LUBGEN 

183 

listings 25 


MAPLOWC 

! 183 

LSTX 32 


MAPPUB2 

183 

LOG 32 


MCRAS 

183 

LSERV 189 


MVCOM 

183 



NOTE 

175 

machine requirements 

25 

OPEN 

175 

macro 


OPENR 

175 

instructions for generating a 

PDUMP 

183 

supervisor 26 62 

PIOCS 

27, 38, 

macros, IBM-supplied 


POINTR 

175 

ALLOC 39, 183 


POINTS 

175 

ASSGN 43, 183 


POINTW 

175 

ATTACH 182 


POST 

183 

CALL 182 


PRMOD 

178, 175 

CANCEL 182 


PRTOV 

175 

CCB 175 


PUT 175 

CDMOD 175 


RCB 183 

CHECK 175 


READ 

175 

CHKPT 183 


RELEASE 

175 

CHNG 183 


RELSE 

175 

CLOSE 175 


RETURN 

183 

CLOSER 175 


SAVE 

183 

CNTRL 175 


SEND 

45, 183 

COMMN 183 


SEOV 

175 

COMMNEX 183 


SETIME 

183 

COMRG 183 


SGDFCH 

183 

CONFG 31 


SGDSK 

183 

DELETECL 73,90 , 

183 

SGSVC 

183 

DELETERL 73,90 , 

183 

SGTCHS 

183 

DELETESL 73,90 , 

183 

SGTCON 

183 

DEQ 183 


SGTHAP 

183 

DETACH 183 


SGUNCK 

183 

DIMOD 178, 175 


SMICR 

183 

DOSCHLV 183 


STDJC 

32, 183 

DTFBG 175 


STXIT 

183 



SUPVR 

29, 183 


183 


183 
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TECB 

183 

TRTAB 

183 

TRUNC 

175 

WAIT 

183 

WAITF 

175 

WAITM 

183 

WRITE 

175 


main storage requirements for elements of 
supervisor 56 
MAINT 

core image library blocks 66, 174 
linkage edit statements 181 
module names 181 
modules, number of 66, 174 
phase names 181 
phases, number of 66, 174 
maintenance examples using merge 
function 93-97 
maintenance procedures 94-97 
maps 25 

maximum unprotected supervisor storage 49 
MCAR/CCH 

core image library blocks 66 
merge examples 

conventions for 94 
MERGE function, use of 94-97 
messages, distribution program 162 
MICR 30 

MNOTES during supervisor assembly 26 

MODE 42 

MODEL 31 

MPS 29 

MRSLCH 39 

multitasking (AP) 30 

OC parameter 33 
OLTEP 35 

core image library blocks 69 
IBM program number 69 

modules, number of 69 

phases, number of 69 
relocatable library blocks 69 
one 2311 disk drive users 
planning 75 

system generation procedure 127 
operational pack 

organization 76 
planning 65 

optimum assignment of work files 
assembly and link 80-82 
compile and link 80-82 
organization of the system pack 76 


parameters 


ALLOC 

39 

ASSGN 

43 

CONFG 

31 

DVCGEN 

4 

FOPT 

33 

IOTAB 

40 

PIOCS 

38 

SEND 

45 

STDJC 

32 

SUPVR 

29 

PC 33 


PCIL 35 


PD 3 4 



PDAID 

core image library blocks 66, 174 
linkage edit statements 189 
modules 189 

modules, number of 66, 174 
phases 189 

phases, number of 66, 174 
relocatable library blocks 66, 174 
transient 189 

transients, number of 65, 174 
physical and logical I/O assignments, 
sample problems 110 
physical transient overlap 35 
PIOCS 

macro 3 8 

parameters 38 
PL/I (D) 

core image library blocks 68 
IBM program number 68 

modules, number of 68 

number library books 68 

phases, number of 68 

source statement library blocks 68 
subroutines and storage 
requirement 68 
transients 68 

planning 

libraries (operational pack) 65 
supervisor 26 
system generation 21 
PORT 31, 50 

main storage requirement 57 
printer support, 3211 (see o211 printer 
support) 

private libraries 73.93 
PRMOD (printer module) 178 
problem determination 

IBM-supplied list for DOS 22 
processing the distribution tape 101 
PTO 35 

QTAM 

core image library blocks 
(transients) 69 
IBM program number 69 
libraray book (macro) number of 69 
modules, number of 69 
relocatable library blocks 69 
source statement library blocks 69 
RDE (ERRLOG) 30 
reason codes (IPL) 30 
recorder file 
EREP 83 

reliability data extractor (RDE) 30 
relocatable library 21, 72 
relocatable library, IBM-supplied 21 
relocatable library 

3211 printer support 190 

common librarian modules 181 

CORGZ 181 

CSERV 181 

DSERV 182 

DUMPGEN 189 

EREP 402 

ESTVUT 188 

IPL 179 

job control 179 
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LSERV 189 

linkage editor 189 

MAINT 181 

PDAID 189 

RSERV 182 

SSERV 182 

standard system dump 188 
translating system dump 188 
utilities-group 1 (see utilities) 
utilities-group 2 (see utilities) 
utilities-group 3 (see utilities) 
system utilities (see utilities) 
replacing identical entries using 
merge function 94 

restore back-up tape to disk 106,107 
restore card to disk 

core image library blocks 70, 71 
messages (BPS utility) 166 
modules, number of 70, 71 

phases, number of 70, 71 

restore system tape to disk 104 
restore tape to disk or data cell 

core image library blocks 70, 71 
modules, number of 70, 71 

phases, number of 70, 71 

RETAIN 35 

retrieving the sample problems 109 

RMSR (ERRLOG) 30 

RPG 

core image library blocks 68 
IBM program number 68 

modules, number of 68 

phases, number of 68 

relocatable library blocks 68 
RSERV 

core image library blocks 66, 174 
linkage edit statements 182 
module names 182 
modules, number of 66, 174 
phase names 182 
phases, number of 66, 174 
rules 

DVCGEN 43 

supervisor generation macros 29 
RWTAU 38 

sample problem 

as successive job steps 110 
preparation 109 
work files 111 
SELCH 38 
SEND macro 45 
SET 158 

size of supervisors 55 
SKSEP 34 
sort/merge 
disk 69 
tape 69 

tape and disk 69 
source statement library 21 
source statement library macros 
components of 66-71 
supervisor generation 66, 183 
supervisor communication 66/ 182 
system generation 73,90, 183 
source statement library 
IBM-supplied 21 


SPARM 33 
SSERV 

core image library blocks 66, 174 
linkage edit statements 182 
module names 182 
modules, number of 66, 174 
phase names 182 
phases, number of 66, 174 
standard label option 92 
standard system dump 

core image library blocks 66, 174 
linkage edit statements 188 
module names 188 
modules, number of 66, 174 
phase names 188 
phases, number of 66, 174 
STDJC 32 
supervisor 182 
supervisor shipped by IBM 191 
supervisor 

communication macro, blocks 66, 174 
communication macro, books 66, 174 

communication macro, names 182 

core image library blocks 
(IBM-supplied) 191 
IBM-program number (14K) 191 

macro, generation, blocks 66, 174 

macro, generation, books 66, 174 

macro, generation, names 183 

macro, instructions 26-46 
macro, instructions storage 
requirements 55 

macros, source statement library 182 
main storage requirements 55 
messages 162 
phase name 182 

phases, number of 14K) 69, 191 

planning 26 
SUPVR macro 29 
switchable channels 157 
SYM 32 
SYSFIL 37 

SYSGEN IPL control and assign 
statements 157 
system configuration 25 
system control 

core image library blocks 66, 174 
IBM-program number 66, 174 
module names 179-182, 188-190 
modules, number of 66, 174 
phase names 179-190 
phases, number of 66, 174 
relocatable library blocks 66, 174 
transients 184-188 
system directory and library track 
capacities 78 
system distribution 

disk only users (2311) 85 

disk only users (2314) 85 

tape users (2311) 85 

tape users (2314) 85 

tape users (3330) 86 

system generation and maintenance 
procedure 84-156 
system utility programs 391 
system libraries 

directory capacities 79 


Module 1: Planning and Procedures 17 



track capacities 79 


$ $ANERAV 
$$ANERR 

184 

184 

table requirements 


$$ANERRA 

184 

DTFCD 177 


$ $ANERRB 

184 

DTFCN 179 


$ $ANERRC 

184 

DTFDI 178 


$ $ANERRD 

184 

DTFPH 179 


$$ANERRE 

184 

DTFPR 178 


$$ANERRF 

184 

DTFSR 179 


$$ANERRG 

184 

TAPE 39 


$ $ANERRH 

184 

tape and disk sort/merge 


$$ANERRI 

184 

core image library blocks 

69 

$ $ANERRJ 

184 

IBM program number 69 


$$ANERRK 

184 

modules, number of 69 


$$ANERRL 

184 

phases, number of 69 


$$ANERRM 

184 

relocatable library blocks 

69 

$$ANERRN 

184 

tape compare 


$$ANERR0 

184 

core image library blocks 

70 

$ $ANERRP 

184 

modules, number of 70 


$$ANERRQ 

184 

phases, number of 70 


$$ANERRR 

184 

tape sort/merge 


$ $ANERRS 

184 

core image library blocks 

69 

$ $ANERRU 

184 

IBM-program number 69 


$$ANERRV 

184 

modules, number of 69 


$$ANERRY 

184 

phases, number of 69 


$ $ANERRZ 

184 

relocatable library blocks 

69 

$ $ANERR0 

184 

tape to card 


$$ANERRI 

184 

core image library blocks 

70 

$$ANERR6 

184 

modules, number of 70 


$ $ANERR7 

184 

phases, number of 70 


$$ANERR8 

184 

tape to data cell 


$$ANERSA 

184 

core image library blocks 

70, 71 

$$ANERSB 

184 

modules, number of 70, 71 


$$ANERSC 

184 

phases, number of 70, 71 


$$ANERSD 

184 

tape to disk 


$$ANERSE 

184 

core image library blocks 

70, 71 

$$BATTNA 

185 

modules, number of 70, 71 


$$BATTNB 

185 
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tape to printer 
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185 
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70 
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70 
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185 

modules, number of 70 
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phases, number of 70 


$$BATTNK 

185 

tape, disk, and data cell 


$$BATTNL 
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configurations 111 

TEB 33 
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$$BATTNN 
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TEBV 33 


$$BATTN0 

185 

teleprocessing 


$ $BATTNP 
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$$BATTNQ 
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$$BATTNT 

185 
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Introduction 


The object of DOS system generation and maintenance is tc tailor the 
IBM-supplied system to the requirements of your installation. This 
tailoring process is accomplished by: 

1. Planning the supervisor functions and the contents of libraries 
necessary to support the applications desired by your installation. 

2. Implementing your plan by performing a system generation procedure. 

IBM supplies the DOS system on either magnetic tape (s) or disk 
pack(s). These distributions are further discussed in Disk Operatin g 
S ystem Di s trib u tions . 

The disk operating system is composed of three libraries: 

The sourc e s tateme nt library contains IBM-supplied macro definitions. 
When the desired parameters are chosen, the macros can be assembled. 

For convenience, the source statement library also contains sample 
problems and system generation job streams that can oe retrieved as 
needed. 

The re l oc ata bl e library contains IBM programs that have not been 
assigned addresses for execution and assembled macros from the source 
statement library. These assembled macros perform input and output 
procedures for IBM-supplied programs. These assembled macros (Logical 
IOCS modules) can also be used by problem programs when applicable. 

The core i mage library contains programs that are ready for 
execution. System control programs and system service programs are 
always shipped in the core image library. Where it is necessary for 
system generation purposes, an assembler program is provided. The 
system control programs must always be part of the system. The 
librarian programs are a key set tc the system and should be carefully 
considered before ever removing them from the system. 

During system generation, work with the IBM-supplied system to tailor 
it to your individual needs by adding to and deleting from the 
IBM-supplied and your own libraries (source statement, relocatable, and 
core image). 


Planning System Generation 


Proper and detailed planning saves on total system generation time. 

Thus, it is important to perform a very thorough job. Figure 1-1 

illustrates an overview of the planning process. 

Planning system generation consists of: 

• Planning the options and estimating the size cf a supervisor. This 
entails selecting from the programming services provided by IBM, 
those options to be included in the supervisor, and estimating the 
cost of these services in terms of bytes of storage. 

• Planning the contents, organization, and ultimate size of the system 
and/or private libraries. This entails distributing the storage 
space available (on the disk packs) between the libraries ultimately 
desired for day-to-day use. Major points cf consideration are: 
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a. the size of the systeir and, if desired, private cere image, 
relocatable and source statement libraries 

b. workfile space needed to assemble a supervisor, and to accommodate 
the linkage editor, which is needed to catalog the components 
selected to the system cere image library 

c. standard assignments (allocation of space) fer werkfiles 
(assemblies), and linkage editing needed for everyday operation. 


C ONSI DERAT IONS AND DECISI ONS 

The following considerations and decisions should be made before system 
generation: 

• Select supervisor options by coding a set of supervisor macro 
instructions (see Pl an ning a S uper viso r). 

• Determine the programs to be in the core image library of each 
operational pack (e.g., CCBCI, FORTRAN, etc). 

• To utilize the problem determination procedures recommended in DO S 
Version 4 M essages , GC33-5009, during system generation, include 
applicable aids from, the following list in ycur DCS system: 

Tape Error Statistics and EVA (Magnetic Tape Error Analysis) 

FETCH/LOAD, I/O, SSVC and QTAM Traces, and the Transient Dump 
(Problem Determination Serviceability Aids, PDAIDs) 

DUMPGEN (DOS Stand-Alone DUMF Generator, with formatting DUMP option) 
LVTOC and DKPR 

Online Terminal Test (Teleprocessing Aids) 

LSERV (Label Cylinder Display Program) 

• Determine the assembler to generate a new supervisor. (See the 
sections on Ass em b ler D and Assembler F. Volumes 2 and 3 of the 2311 
system have the 14K assembler supplied in the cere image library. 

• If the system supports both the batched-jcb foreground and private 
core image library options, give consideration to which IBM-supplied 
programs are to be placed in a private cere image library or 
libraries. Under such a system, the linkage editor executes in any 
partition. You can link-edit mest IBM-supplied programs for 
execution in a batched-job foreground partition and place them in a 
private core image library assigned to that partition if enough cere 
storage is available to execute the link-edited program. If desired, 
the version to execute in the background partition may be retained in 
the system core image library. 

You must place the supervisor, $$A$SUP1, in the system core image 
library. A supervisor cataloged to a private core image library 
cannot be used, because the IPL retrieval program searches the system 
core image directory only. If the requested phase is a $$R phase 
(RAS transient), the system only searches the core image directory. 

If the requested phase is a $$A or $$B phase (transient), the system 
first searches the system core image directory, then, if necessary, 
the private core image directory assigned tc the partition; if the 
phase is not found, the system enters the wait state with an error 
message of 04W (X'04E6') in bytes 0 and 1 cf lew main storage. 
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When you request other phases, the systerr searches fcoth the systerr 
and private directories, if necessary. If the phase starts with $, 
the system first searches the system core image directory and, if it 
does not find the phase, it then searches the directcry of the 
private cere image library, assigned to the partition. If the 
requested phase does not begin with a $, the erder is private cere 
image directory, then system core image directory. 


The ERP transient $$ANERSE supports the error recovery for the 2245 
Kanji Printer. If you dc net have this printer ycu iray delete 
$$ARERSE from the core image library of your operating system. 


• Determine which modules are to be deleted from the relocatable 
library of each operational pack. Deleting from the relocatable 
library allows for expansion of the system core image library to hold 
a greater number of components. Refer tc the ircdule for each 
component for its sizes. 


• Also determine if the macro definitions used to build the supervisor 
and IOCS modules are to be deleted from the source statement library. 
Retaining the macros in the source statement library facilitates 
building a new supervisor and new ICCS modules. 


• With one disk drive you may prefer to maintain cnly enough room in 
the relocatable library of the operational pack to contain the 
modules for building the largest component in the system. This small 
relocatable library permits temporary insertion of any component in 
relocatable form. It can then be immediately linkage edited into the 
system core image library and then deleted from the relocatable 
library. When the relocatable library is subsequently condensed, 
cnly the updated core image form of the component remains, thus 
conserving disk-storage capacity. Reducing the size cf the 
relocatable library allows expansion of the system core image 
library. The expanded system cere image library allows a greater 
number of components to be contained in a single systems volume. 


• Copy and restore programs are necessary to transfer the resident 

system from tape to disk, frem disk tc tape, frem disk to cards, and 
from cards to disk for maintenance and backup purposes. 


• The procedures for the configurations shown in this publication 

assume the system packs tc be initialized with the VTOC on cylinder 
199, when using either a 2311 or 2314/2319, or on cylinder 403 when 
using a 3330, and the werk packs to be initialized with the VTOC on 
cylinder zero or 199 (for a 2311, 2314, or a 2319) or on cylinder 0 
or 403 (for a 3330). 
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Figure 1-1. INTFODUCTION--Planning Summary 
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MAPS AND LISTINGS PRO DUCED DURING SYS TEM GENERA TIO N 

All linkage editor output on SYSLST from the systeir generation procedure 
and any future updates (including maps produced by the linkage editor) 
must be retained. These maps provide necessary information on the level 
of the system and the load address (relocation) of each component. 
Similarly, supervisor assembly listings should be retained. These maps 
and listings are used by the systems programmer and the field engineer 
maintaining the system. 


System Configuration 

This section presents the minimum system configuration required to 
operate the disk operating system. The system control programs and 
basic IOCS must always be present to execute any other programs. 


M IN IMUM MA CHINE REQUIREMENTS 

A System/370 CPU Model 135, 145, or 155. 

Standard instruction set. See Not e 1. 

Two I/O channels (one multiplexer, and one selector or the integrated 
file adapter). See No te 2. 

One Card Reader (1442, 2501, 2520, 2540, cr 3505). See Note 3. 

One Card Punch (1442, 2520, 2540, or 3525). See Not e 3. 

One Printer (1403*, 1404**, 1443, 2245, or 3211). See No te3. 

* 1403 Model STL if not attached to a 2821. 

** if not attached to a 2821. 

One 3210/3215 Console Printer Keyboard, attached tc the multiplexer 
channel. 

One 2311 Disk Storage Drive, or 
One 2314 Direct Access Storage facility, cr 
One 2319 Direct Access Storage Facility, or 
One 3330 Disk Storage (See Note 4). 

N ote 1: Language translators may require extended instruction sets. 

N ote 2: Telecommunication devices should not be on the same selector 
channel as SYSRES. 

N ote 3 : One 7-track 2400 series cr one 7-track 3420 magnetic tape unit, 
or one 9-track 2400 or 3400 series magnetic tape unit, or a 
disk extent may be substituted for this device. If 7-track 
tape units are used, the data-ccnversicn feature is required, 
except when substituted for a printer. Neither the tape unit 
nor the disk extent can be substituted fcr the card reader as 
the communication device during system IPL time. 

N ote 4; The 3330 Disk Storage requires a high-speed selector channel. 
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Planning a Supervisor 


The supervisor is a control program that provides specialized services 
to programs executed from the problem program area cf main storage. 

This program is composed of a group of assembled macros. The options 
selected in each of the supervisor generation macros determine the size 
of the assembled supervisor. The size of each option is identified in 
Supervi so r Main S torage Requirements. 

Th e SE ND m ac ro det ermines the end of the supervi so r._If a su pervisor 

is as semb led wi th a S EN D address larger than the previous su p erv isor, 
so me po rt io n of t he s up ervisor is overlaid by pregr am s lin kage e d ited t o 

t he previ ou s S END address ._After the new super vi scr is leaded, 

r elink a ge edi t these prog rams sc that the new lead ad dress fo llo w s the 
n ewly assembl ed sup er vi sor. 

Note that at each IPL, ycu must include ADD and A3SGN statements for 
each device until a system supervisor is built that describes your 
machine configuration and standard I/O assignments (see DVCGEN and ASSGN 
macros). 

To calculate the size of the supervisor, list all cf the options that 
are chosen and then determine the sum of the sizes obtained from the 
storage requirements (see Supervi sor Main St orage Requirements). 

When choosing supervisor parameters, check to see if the chosen 
options are compatible. Alsc, check tc determine which parameters 
automatically provide the support for another. 

With the IBM-supplied volume, each installation normally generates a 
more efficient supervisor using the supervisor generation macro 
instructions. The macro instructions describe the machine 
configuration, standard I/C assignments, and standard processing 
options. 


MN QTES DURING SUPE RVI SOR ASSEMBLY 


During supervisor assembly, the assembler may generate one or more 
MNOTEs. You may choose to ignore some by accepting the assumed values 
given in the MNOTEs. For others, you may have to interrupt procedures, 
modify one or more specifications in a iracrc cr macros, and reassemble 
the superviscr. 

Some gene ral p rocedures for resolving MNOTEs are: 

1. Go to the DIAGNOSTICS section at the end of the supervisor assemcly 
listing. This section includes references tc the MNOTEs generated 
during assembly. Each MNOTE reference is in the form 

statement-number IJYQ37 MNOTE STATEMENT 

2. Using the statement number, gc back intc the listing and examine 
each of the MNOTEs. A severity code precedes the message portion 
(the higher the code, the mere severe the errer). Each MNOTE is 
listed aftej - the raaepo with which it is associated. 

3. Determine the reason for the MNOTE. The MNOTE message indicates the 
parameter in question and usually provides a clue tc the type cf 
discrepancy. Some errors tc lcok for are: 

• Misspelled items or mispunched numbers. 
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Parameters that are incompatible with other parameters in this cr 
another macro. 


• Parameters that are outside the valid limits. 

4. Make any necessary changes and reassemble. If you have no changes 

to make (in other words, the assumed values listed in the MNCTEs are 
acceptable), continue with the generation procedures. Some errors 
are so severe, however, that nc object deck is generated, and you 
m us t correct one or more macros and reassemble before continuing. 


E xample of MN OTE Resolu ti on s 


The following example of a single supervisor assembly contains macros 
and the MNOTEs generated by the macros. Each set is followed by a 
discussion of how the MNOTE can be resolved. Because several macros 
need to be modified to achieve the desired results, it is necessary to 
reassemble. 

1. FOPT PTG=YES,CCHAIN=NE,IDRA=YES,JA=(1000,270), X 

DASDFP=(0,7,2321) ,CBF=YES 

a. 3,CCHAIN SPECIFICATION INVALID-'NO' ASSUMED 

b. 3,INCORRECT THIRD SUBCFERAND OF DASDFP, EASDFP=N0 ASSUMED 

C. 3,THE CHANNEL SPECIFICATION IS ABOVE MAXIMUM ALLOWABLE VALUE, 
DASDFP=NO ASSUMED 

d. 3,JA SPECIFICATION INVALID 'NO* ASSUMED 

e. 3,CEE SPECIFICATION INCORRECT - 1 BUFFER ASSUMED 

f. 3,PTO=YES INVALID IN A BATCH SYSTEM - 'NO' ASSUMED 
D iscussi on: 

a. Specification for CCHAIN is misspelled. The default is the 

desired result, however. If this were the only error, there 
would be no need to reassemble. 

b. This is another keypunch error (2331). Repunch the card with a 

corrected third operand. 

c. The valid range of channels is 0-6. This parameter must be 

repunched for DASDFP. 

d. There are two reasons why the JA parameter is invalid. First, 

the numbers themselves are too large - the maximum is 255 per 
partition. Second, MPS=BJF must be specified in the SUFVR 
macro if SIO (Start I/O) count is to be supported in the 
foreground. Repunch both items with the proper entries. 

e. The CBF parameter must be specified as NO or as a decimal nuiroer 

in the range 1-50. If you are net satisfied with the assumed 
value, repunch and reassemble. 

f. For FTO to be valid, you must specify MPS=YES or BJF in the 

SUPVR macro. Repunch the SUPVR macrc specification and 
reassemble. 
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2 . 


PIOCS BMPX=YES 


3,BMPX SPECIFICATION INVALID WITH MICR SUPPORT - 'NO' ASSUMED 

Di scuss io n; MICR=1419 was specified in the SUPVR iracro. Assuiring 

that the MICR specification was intentional, ycu can merely accept 
the assumed value of NC for BMPX. If this were the cnly error, you 
would not need to reassemble. 

3. ALLOC Fl=14K,F2=14K 

7,THIS MACRO ONLY VALID IN MPS SYSTEM-THIS MACRO IGNORED 

D iscu s sio n: The SUPVR macro is the real cause of error (assuming 

you want an MPS system). Repunch the specification in the SUPVR 
macro for MPS=YES or BJF and reassemble. 

4. IOTAB EGPGR=250,F1PGR=250,F2PGR=250,IODEV=256 

a. 3,EGPGR SPECIFICATION ABOVE MAXIMUM-'10' ASSUMED 

b. 3,IODEV SPECIFICATION ABOVE MAXIMUM-'10' ASSUMED 

c. 3,F1PGR IS INVALID PARAMETER WHEN MPS=NO 

d. 3,F2PGR IS INVALID PARAMETER WHEN MPS=NC 
D iscu ssion: 

a. The number of programmer Logical Unit Blocks (LUEs) for all 

partitions cannot exceed 222 when MPS=BJF or 244 when MPS=YES 
or NO. Also see the discussion for c and d. 

b. The maximum specification for I/O devices attached to the system 

is 255. Accept the default, or repunch the macro 
specification with an acceptable value and then reassemble. 

c. Repunch the SUPVR specification to MPS=YES or BJF. You must 

and also repunch the prcgrammer LUB specifications in the ICTAE 

d. macro, since the sum of the LUB specifications for the 
background and foreground partitions exceeds the maximum as 
described in a. 

5. SEND 


NUCEND EQU * 

1, WARNING - IF ADDRESS OF NUCEND IS GREATER THAN ADDRESS GE 
SYSEND, SEND ADDRESS SPECIFICATION WAS TOO SMALL 

D iscu ssion: This message is always printed and should be checked 

after each supervisor assembly. With no address specified in the 
SEND macro, the addresses, NUCEND and SYSEND, will probably change 
when you reassemble with one or more macros changed from the 
previous run. 

Be sure the NUCEND address is not greater than the SYSEND address 
(if tne SEND address is not specified, the addresses will be equal). 
Compare the two hexadecimal addresses (at the left margin of the 
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listing) to ensure that the SYSEND address is at least as large as 
the NUCEND address. Read the discussion cf the SEND macro and make 
any adjustments you feel are necessary or desirable. 

This section defines the ten macro instructions and their parameters 
required to generate an installation-tailored supervisor for the disk 
operating system. Figure 1-4 is a consolidated list cf the supervisor 
generation macros. 


RULES FOR USING SUPER VI SOR GE N ERA TION MAC ROS 

1. The assumed value default for an omitted parameter is u nder l ined in 
the following discussion and in Figure 1-4. Figure 1-5 shows the 
device type codes of the DCS supported devices used for system 
generation. 

2. Material enclosed in braces { } indicates a programmer option. One 
of the enclosed values must be selected by the programmer. 

3. Bracketed operands are optional, e.g., [nJ. 

4. Replace the letter n in a parameter with a decimal number. 

5. The name field must be blank. The operation field always contains 
the mnemonic operation code. The operand field contains the 
parameters. 

6. Several parameters may be included on one line for all macros. 
Separate each parameter with a comma. No embedded blanks are 
permitted. Continuation cards are permitted (nonblank character in 
column 72; the continue column is column 16). 

7. In the expression X'cuu', replace cu u with the hexadecimal number 
for channel and unit. 

8. The macros must be issued in the following sequence: SUPVR, CCinFG, 
STDJC, FOPT, PIOCS, ALLCC, ICTAB, DVCGEN, ASSGN, SEND. 

9. The DVCGEN, ASSGN, and ALLOC macros are not required. They are 
specified if input/output tables (DVCGEN) are being specified, if 
standard assignments (ASSGN) are being made or if storage is 
allocated (ALLOC) for MPS at system generation time. 

10. An END card and a /* card must follow the SEND macro instruction. 


SUPVR 


The Supervisor (SUPVR) macro instruction and its parameters define tne 
system as disk resident with the ability to support certain desired 
functions, such as multiprogramming, MICK, cr teleprocessing. 


PARAMETERS FOR SUPVR 


( 

MPS=<YES> 

(BJF) Specify if there is to be multiprogramming support. When YES or 

BJE' is specified, the system generated is capable of supporting two 
foreground programs. YES cr BJF must be specified if TP=QTAM. 

When EJF is specified, batched job environment will oe supported 
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for both foreground partitions. Multiple communication regions are 
generated only if BJF is specified. MPS=YES is iirplied if MPS=BJF 
is supplied. This parameter is discussed further in the DOS System 
Progr ammer' s Guide , GC24-5073. 


TP= 


NO 
I ETAM 

. qtam 

QTAMn 


Specify if teleprocessing support is desired, and, if so, whether 
Basic or Queued Access Method (BTAM or QTAM) is desired. When QTAM 
is specified, SVC support for BTAM is also included. For 
multitasking, n is the maximum nuirfcer of problem programs in the 
system at one time. n may have any value from 2 to 12. (For 
multitasking, AP must equal YES.) If AP=NO and QTQMn are 
specified, n must be 2. 


{ NO) 

MICR=< 1419 > 

(1419D) Specify if the supervisor is to support magnetic ink character 

readers cr optical reader/scrters. If 1255/1259/127C/1275s are to 
be supported, indicate 1419. 1419D indicates Dual Address Adapter 

1419/1275s only; 1419 support dees not provide 1419D support. If 
1419s or 1255/1270/1275s are attached to the multiplexer channel, 
the PICCS parameter EMPX=YES is net supported. This parameter is 
discussed further in the DOS Syste m Program m er's Guid e, GC24-5073. 

/ SO l 

ASCII=(YES/ Specify YES if supervisor support cf ASCII-Code is desired. If 
ASCII is omitted, NO is assumed. 

AP =( NO) 

{YESJ Specify if there is tc be multitasking support. Multitasking 

allows the execution of more than one program within a partition. 
MPS=YES and WAIIM=YES are assumed if AP=YES. If the operand of 
this parameter (NO or YES) is misspelled, AP=YES is assumed. This 
parameter is discussed further in the DOS S ys te m P rogrammer's 
Guide. 

I 

EU= |YES j Specify EU=YES if you require mixed parity tape processing for the 
emulators and the tape preprccesscr and tape postprocessor 
programs. You do not need to specify EU=YES to run the programs if 
mixed parity tape processing is net required. 

Note; For reasons of compatibility with earlier DOS releases, 

specification of EU=RELOC is accepted by the assembler. The 
cede generated is the same as if EU=YES had been specified. 

( YES ) 

ERRLOG= ( RDE/ Specify to include Recovery Management Support Recording (RMSR) and 

the Reliability Data Extractor (RDE). RMSR records device errors, 
statistical data, and cumulative error status for I/O devices on 
the SYSREC file. 

RDE causes RMSR tc gather hardware reliability data used by IEM 
personnel to evaluate hardware performance. The RDE option does 
not require any additional main storage, however, the operator must 
enter a reason code in reply to message 1189A (see DOS_Version_4 
Messa ges, GC33-5009), each time he performs the IPL procedure. 

ERRLOG=YES provides RMSR support only; specification of 
ERRLCG=RDE provides suppert for beth RMSR and RDE. If ERRLOG is 
not specified, ERRLOG=YES is assumed. 
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Note: For reasons of compatibility with earlier DOS releases, 

specification of ERRLOG=(YES,RDE) is also accepted by the 
assembler with the effect that code is generated as if 
ERRLCG=RDE had been specified. 


CONFG 


The configuration (CONFG) iracrc instruction and its parameters define 
the system configuration and can specify generation of optional 
supervisor services. If the assumed options are all satisfactory, the 
only entry required is the CONFG macro itself without any parameters. 


PA RAMET ERS FO R CONFG 


f 135 ) 

MGDEL=<145V 

(l5S) Specify the CPU model number. If this parameter 
is omitted, cr if an incorrect ircdel number is 
specified, supervisor generation is terminated. 

Specify: 


MCDEL=135 for the IBM Model 3135 CPU 
MODEL=145 for the IBM Model 3145 CPU 
MCDEL=155 for the IEM Model 3155 CPU. 



Specify if the decimal feature is present. 

Specify only if the floating point feature is 
present. 


Specify PORT=155 when running a 145 System on a 
Model 155 CPU, in order tc prevent data less. The 
PORT option will then reserve sufficient storage 
for the Model 155 extended lcgcut area. If 
MODEL=135 or MODEL=155 is specified, PORT should 
not be specified. 


Note : The storage protection feature has been made standard. The 

Interval Timer (at location 80) has also been made standard. If, 
however, you erroneously specify either SP= cr TIM£R= (irrespective of 
whether the operand is YES or NO), the assembler will accept your 
specification and merely react by generating an MNOTE, which need not be 
resclved. 
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STDJC 


The Standard Job Control (STDJC) macro instruction and its parameters 
specify the standard settings for job contrcl. If the assumed options 
are all satisfactory, the only entry required is the STDJC macro 
instruction itself, without any parameters. These st an dard options can 
b e locally overridden by an OPTION st atem e nt, exc e pt LIKES a n d DATE. 
LIN ES can be ov erridden by a SET c om m and , D ATE by a // DATE statemen t. 


PARAMETERS FCR STDJC 


DECK= 


LIST— 


LISTX= 


SYM= 



Specify if language translators are to output 
object modules on SYSPCH. 


Specify if language translators are to write 
source module listings and diagnostics on SYSLST. 


Specify if compilers are to write hexadecimal 
object module listings cn SYSLST. 


Specify if assembler is to output symbol tables on 
SYSPCH. SYM=YES may be specified if the PL/I (D) 
compiler is to produce a symbol and offset table 
listing, or if American National Standard COEOL is 
to produce a data division glossary. 


( YES ) 

XREF=\ NO/ Specify if assembler is tc write symbolic 

cross-reference lists cn SYSLST, cr if American 
National Standard COBOL is to produce a 
cross-reference listing. 

( YES ) 

ERRS=\ NO/ Specify if compilers are tc summarize all errors 
in source programs on SYSLST. Assembler and PL/I 
(D) always assume ERRS=YES. 


( 48C ) 

CHARSET=)60C/ Specify either the 48- or 60-character set for 
PL/I (D) translator input cn SYSIPT. 

( YES ) 

LOG=) NO/ - Specify for a listing of all control statements cn 
SYSLST. LOG=NO suppresses the listing of all job 
contrcl statements on SYSLST. Invalid statements 
and commands will be listed on SYSLST if it is 
assigned. 

( YES ) 

DUMP=( no/ Specify if a dump of the registers and main 

storage is to be written cn SYSLST in case of an 
abnormal program end. 


LINES= 



Specify the number of lines per page on SYSLST. 
The minimum is 30; the maximum is 99. 
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DATE = 


SPARM= 


( MDY ) 

(DMY/ Specify the format of the date MDY=ir.onth/day/year. 
DMY=day/month/year. 

/ NO l 

(YESj Specify if the SSYSPARM variable cf the 
Assembler D (14K) is to be supported. 


FOPT 


This Optional Features (FOFT) macro and its parameters specify 
additional optional features that can be included in the supervisor. 

The following parameters of the FCPT macro are discussed further in the 
D OS Syste m Pro g rammer's Guide , GC24-5073: OC, IT, PC, TEB, TEBV, EVA, 
SKSEP, PTO, CBF, CCHAIN, TRKHLD, AB, WAITM, DASDFP, and SYSFIL. IT, 
TEB, EVA, DASDFP, TOD, and ZCNE are discussed in DOS Ve rsion 4, 
GC33-5007. 


PA RAMET ERS FOR FO PT 


/ NO) 

OC=(YES/ Specify if external mterrupticns (except timer) 
can be handled by problem programs. If YES is 
specified, the facility is available to all 
programs in MPS. The Tape Compare Utility program 
requires CC=YES. YES is required if emulator 
program operator services are to be requested 
through the INTERRUPT key. If RETAIN=YES or 
OLTEP=YES is specified, CC=YES is forced. 


1 NO 
BG 
FI 
F2 


Specify if the interval timer can be handled by 
problem programs. Timer support is available to 
only cne program in MPS. CTAM requires Fl. 


{ NO) 

PC= (YES/ Specify if a user program check routine will be 
used. Included in supplied supervisor because 
QTAM, FORTRAN IV, Basic FORTRAN, CCBOL-D, FL/I 
(D), and RPG require PC=YES. 


TEB=( n/ Specify if tape error statistics are to be 

accumulated and logged for the 2495 Tape Cartridge 
Reader, where n is the number of tape cartridge 
readers attached to the system. Choose a value cf 
n that allows for possible future expansion of the 
system. 


TEBV= 



Specify if tape statistics are to be automatically 
accumulated in the PUB2 table and logged on the 
SYSREC file. For all standard labeled tapes, tape 
statistics are accumulated by volume. For 
unlabeled or nonstandard labeled tapes two types 
of error recording are available: 


• Combined Recording (CR), and 

• Individual Recording (IK). 
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When TEBV=CR is specified, the error statistics 
for all nonstandard and unlabeled tapes on a 
specific tape unit are accumulated until a 
standard labeled tape is ircunted and opened on 
that unit. Then one recording of the statistics 
for the nonstandard, unlabeled tapes is made and 
the counters are reset in the PUB2 table. 

Specify TEBV=IR to reccrd tape error statistics 
on the SYSREC file and reset the PUB2 table 
counters at each OPEN fcr nonstandard and 
unlabeled tapes. 


I 

EVA=((r,w); Error volume analysis is supported (may be used 
with or without TEEV and TEB). r specifies the 
number of temporary read errors that can occur. 
When the number of temporary read errors that 
occurred exceeds the value of r, the operator is 
notified via a message cn SYSLOG. The maximum 
value for r cannot exceed 254. 

w specifies the number of temporary write 
errors that can occur. When the number of 
temporary write errors that occurred exceeds 
thevalue of w, the operator is notified via a 
message cn SYSLOG. The maximum value for w cannot 
exceed 254. 

( NO) 

SKSEP=<YES > Specify if SEEKs are tc be separated from the 

( n) remainder of channel programs. Seek separation 

allows other devices cn the channel to be accessed 
(including other seeks) during the seek. YES 
indicates support for all EASD type devices 
specified by the DVCGEN macro at system generation 
time. n is the number of DASD devices to be 
supported and cannot be less than the number of 
DASD devices specified at system generation. The 
maximum is 254. 


PD=<YES > 

( n) The PD parameter must be specified if the problem 
determination pregrams (PDAIDS) are desired. 

PD=YES specifies that a minimum of 800 bytes is 
reserved for this function. Any amount between 
800 and 10,240 bytes may be specified for n. 

( ) 

JA= <j YES > 

( (n a .,n 2 #n 3 )j Specify if Job Control Job Accounting Interface is 
to be supported.. 


JA=YES indicates support for each batch 
partition. 

JA=(n 1 ,n 2 ,n 3 ) specifies additional support for 
SIO ccunt of input/output devices, and JA=YES is 
generated. n Xt n 2 , and n 3 indicate the number of 
I/O devices for which the number of SIOs are to be 
counted in the background, foreground 2, and 
foreground 1 partitions respectively. n may be 
any number from 0-255 and is independent of the 
number of I/O devices assigned to the system. 
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JALIOC S= 


I 


NO) 

(s,l) / 


PTO= 



IDRA= 



OLTE P= 


RETAIN= 



PCIL= 



Jot: accounting tables for foreground partitions 
are generated only if MPS=BJF. 

Specify for support of user-written jot accounting 
routines containing LIOCS, and LIOCS with label 
processing. 

s and 1 reserve a user save area and a label 
area equal tc their specifications (i.e., if s 
equals 25, then a 25-byte save area is reserved). 
s can be any decimal number in the range 0 - 102*1. 
If s is omitted, or if JALIOCS=NC, 16 bytes are 
still reserved in the supervisor. 1 can be any 
decimal number between 0 and 224. 

Specify if the Physical Transient Overlap (PTC) 
feature is to allow the system tc select tasks 
while Fetch is reading a fetched (or loaded) phase 
from the system residence file, cr while I/O 
operations are being performed during Error 
Recovery Procedures (ERP). This overlap allows 
increased throughput. MPS=YES or BJF must be 
specified. 

Specify IDRA=YES if the Independent Directory 
Read-in Area (IDRA) feature is desired. IDRA=YE£ 
allows the system tc read the directory containing 
the location of the phase specified in a FETCH or 
LOAD command into the IDRA. Thus, with the IDRA 
feature, throughput may increase when an error 
recovery procedure is in progress. IDRA=YES is 
valid only if MPS=YES cr EJF in the SUPVR macro. 

If IDRA=YES is specified and PTO is not specified 
or equals NO, PTO=YES is assumed. 

Specify CLTEF=YES if the cn-line testing function 
is desired. OLIEP=YES allows the on-line test 
executive program to execute. If CLTEP=YES, then 
CC=YES is forced. 

RETAIN is an OLTEP function that allows the OLTEP 
programs tc be executed, initiated from a remote 
location. RETAIN is a problem determination tool 
used by IBM. If this function is to be used, 
specify RETAIN=YES and include the IBM 2955 Retain 
Communications Device in the PUB table. External 
interruptions are required fcr RETAIN operation; 
therefore, if RETAIN=YES is specified, OC=YES is 
forced. If RETAIN=YES is specified, CLTEP=YES is 
also forced. 

The RETAIN function is available on the Models 
135, 145, and 155 in the United States of America 
only. 

Specify if private core image libraries are to be 
supported. These have the same format as the 
system core image library cn SYSRES. You may 
assign private core image library to any 
partition. Selection of the batched-job 
foreground (MPS=EJF) cpticn and the private core 
image library option gives the ability to 
link-edit in any batched-jet partition. You may 
link-edit many IBM-supplied programs to run in a 
foreground partition and place them in a private 
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core iirage library tc be assigned to that 
partition. Specifying PCIL=YES and MPS=NO or YES 
provides private core image library support for 
the background only. 


/ no ) Specify the number of I/O requests to be buffered 
CBF=\ n/ under the following conditions: 


1. The actual record to be written does not 
exceed 80 characters. 

2. Data or command chaining is not performed. 

3. The CCB associated with this operation does 
net indicate the acceptance cf unrecoverable 
I/O errors, posting at device end, or user 
error routines. 

4. The CCB does not request sense information. 

Console buffering allows overlap of CPU 
processing with write operations tc SYSLOG by 
satisfying the requestor’s WAIT immediately, 
rather than at I/O completion time. When this 
option is selected, the number of CHANQ entries 
should exceed the number cf CBE entries so that 
the buffering process is not bound by the number 
of CHANQ entries. If the assumed option is taken 
for CHANQ and CBF is selected, the number of CHANQ 
entries is assumed tc be six mere than the CBF 
entry. Numbers 1 through 50 are valid, and one is 
assumed if the operand is invalid. 

/ NO) Specify if command chaining support for retry on 
CCHAIN=/YES/ I/O operations is to be handled. When command 
chaining and an error occurs, CCHAIN allows the 
user to retry at the last CCW executed. Normal 
retry would return tc the first CCW in the channel 
program. To make use of this option, you must 
have the appropriate kit set in the CCB. 

CCHAIN=YES must be specified if data or command 
chaining cf IBM 2495 Tape Cartridge Reader input 
is performed, or if command chaining is required 
to read cr write multiple tape records. 

|NO) Specify if the track held function is to be 
TRKHLD=\ n/ supported. When processing sequential disk 
workfiles cr updates to direct access files, 
specify if a hold is to be placed cn the track of 
the record being read. The hold prevents anyone 
else that is using track held frem accessing that 
track. The maximum number of tracks that can be 
held at cne time is 255. The default is 10 if n 
is an invalid parameter (nonnumeric or outside the 
range 1-255). MPS=YES cr BJF must be specified if 
TRKHLB=n. 

/ NO) Specify if the abnormal termination exit function 
AE=/YES/ is to be supported. The abnormal termination exit 
allows you to exit to a user's routine before an 
abnormal end-of-job causes a program to be 
cancelled. Specify YES fer American National 
Standard COBOL I/O error recovery. 
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( NO) Specify if the multiple wait function is to ne 
WAITM=\YES / supported. This function allows you to use the 

WAITM iracro to wait fcr one cf a nuirfcer of events 
to occur. WAITM=YES is assuired if AP=YES. 


EASDFP= 


( NO 

\(n,n 

,2311] 

/ 

, 2314( 

) 

, 3330 

, 

,2321] 


) 


Specify if supervisory EASE file protection is 
handled where n,n indicates the range of channels 
to which EASES may be attached. Either 2311 or 
2314 indicates file protection for 2311, 2314, and 
2319. 3330 indicates file protection for 2311, 

2314, 2319, and 3330. Specification of 2321 
indicates file protection fcr all EASD devices. 

If the third operand is omitted, file protection 
for 2311, 2314, and 2319 is automatically 
provided. DASDFP prevents you from writing 
outside the extents cf ycur file in case of 
program error. Extents are protected to the 
nearest cylinder except fcr 2321, where they are 
protected to the nearest head bank. This feature 
does net protect the file freir being overwritten. 


N ot e; If a disk device type is specified by the 
third operand and this disagrees with the 
one as specified by the DISK parameter of 
the PIOCS macro, the value cf this 
parameter will overrule the one specified 
by the third operand. 


//NO ) 
SYSFIL=^YES/ 


t ,n 2 ])/ 

Specify if system input and system output (SYSRDR, 
SYSIPT, SYSLST, SYSPCH) files may be assigned to a 
disk device. Specification cf YES gives support 
for all disk devices. If MPS=BJF in the SUPVR 
macrc, this parameter supports foreground logical 
units when running in batched mode. If the 
emulator program parameter SYSIO=222 or SYSI0=333 
is indicated, a value must be specified for 
SYSFIL. 


n ± = residual capacity for beginning of operator 
notification when SYSLST assigned to disk. 
lOO^n^ <65535. If n ± is omitted, 1000 is 
assumed. 

n 2 = residual capacity fcr beginning cf operator 
notification when SYSPCH assigned to disk. 
100<n 2 <65535. If n 2 is emitted, 1000 is 
assumed. 

N ote 1 : If neither ni or n 2 is specified, the 
operand need net be placed between 
parentheses (). 

N ote 2: Specification of either SYSFIL=2311 or 
SYSFIL=2314 is alsc accepted by the 
assembler with the effect that code is 
generated as if SYSFIL=YES had teen 
specified. 
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TCD=(YES/ Specify if time of day clock support is desired. 

If YES is specified, GETIME support is provided. 
Every time a GEIIME is issued, the date fields in 
the supervisor communication regions are updated, 
if necessary. 


Specify the difference between Greenwich Mean Time 
(GMT) and local time in hours (hh) and minutes 
(mm). Use EAST for areas tc the east of the 
meridian of Greenwich, Great Britain, and WEST for 
areas to the west of the meridian cf Greenwich, 
Great Eritain. The value used in the ZONE 
parameter is used to obtain the lccal time-of-day. 
If the parameter is not, or incorrectly specified, 
or if TOD=NC is specified, ZONE=NO is assumed. 

You can change the zone value (default is GMT) 
every time ycu perform the IPL procedure, by 
specifying any zone value in the ZONE parameter cf 
the SET control statement. 

N ot e: Information on macro instructions STXIT, EXIT, and SETIME is 

contained in the D OS S up ervis or and I / O Mac ro s, GC24-5037, and 
DO S Vers ion 4 , GC33-5007. 


ZONE : 


NO 

[/EAST) hh,mm) 
(WEST / 


PIOCS 


The Physical Input/Output control System (PIOCS) macro instruction and 
its parameters define the configuration requirements tc he supported by 
physical IOCS. If the assumed options are all satisfactory, the only 
entry required is the PIOCS macro itself, without any parameters. 


PARAMETERS FOR PIOCS 


/YES) 

SELCH=( NOJ Specify if selector channels are attached to 

the system. YES must be specified if MODEL=25. 

I 

BMPX= (YES ) Specify if burst mode devices are supported on 
multiplexor channel. If YES is specified, 
unbuffered devices will run in burst mode. If 
1419s or 1255/1259/1270/1275s are attached to 
the multiplexor channel, BMPX=YES is not 
supported. 


CHANSW= 


NO 

RWTAU 

TSWTCH 


Specify if channel switching tape control unit. 
For a 2404 or 2804, enter CHANSW=RWTAU. For a 
2816 (with a 2403 cr 2803) cr a 3803 enter 
CHANSW=TSWTCH. 
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NC 

TAPE= 9 

7 Indicates required tape PIOCS support. If TEE, 
TEEV, or EVA is specified and TAPE is not, then 
TAFE = 9 is assuired. 

9 = nine track only. 

7 = seven or nine track. 

NC = No tape drives attached. 

/ NO) 

MRSLCH=(YES/ Specify if MICR device is on the selector 
channel. 

( 2311 ) 

2314 

DISK=(3330) Specification of 2311 cr 2314, cr omission of 
the parameter, gives PIOCS support for both 
2311 and 2314/2319. Specification of 3330 
gives support for all disk devices. 


ALLOC 


ALLOC El=nK,F2=nK The Allocate (ALLOC) macro instruction 

specifies the storage partitioning of MPS, 
where n must be a multiple of 2. This macro is 
optional. Most IEM components require 14K 
bytes of background area. Foreground area must 
be a minimum of 14K tc allow EJF processing. 

The ALLOC macro is discussed further in the DCS 
System P r og r ammer' s Gu ide. 


Sy st em -U sed Areas 


Each foreground partition contains a save area 
for program name, old program status word, and 
registers. The background save area is located 
in the supervisor. All partitions contain a 
label area for label processing if the LBLTYP 
statement is used. Both areas (except for the 
background save area) are at the low end of the 
partition. 

Save are a length is 88 bytes cr 120 bytes if 
the floating point feature (FP=YES) was 
specified in the CCNFG macro. 

Label ar e a length is determined by the system 
according to the LBLTYP card specification: 

• TAPE (standard tape labels) = 80 bytes 

• NSD (nn) (nonsequential disk) = 84 bytes + 

20 bytes per extent statement 

• emitted = 0 
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Save Area Consideration 


If you have a background jot that uses nearly 
all the partition and you plan to run that sarre 
job in the foreground, you iray need a 
foreground partition larger than background. 

For exairple, assuire you specified FP=YES, your 
background partition is 14K (14,336 bytes), and 
your background jcb, including the label area, 
is 14,290 bytes. Because of the save area, the 
jcb requires an additional 120 bytes in 
foreground and exceeds 14K. The foreground 
partition, then, will have tc be at least 16K 
to run the job unchanged. This applies to both 
IBM and user prograirs. 


IOTAB 


The Input/output Tables (IOTAB) macro instruction and its parameters 
define the area for the necessary device tables for the system. If the 
assumed options are all satisfactory, the cnly entry required is the 
IOTAB macro itself without any parameters. 


PARAMETERS FOR IOTAB 


BGPGR 


•M 


FlPGR 




F2PGR : 




JIB 


-{ 5 } 


Specify the number of Logical Unit Blocks 
(LUBs) fcr programmer units, i.e., the number 
of symbolic programmer logical units 
(SYSOOO-SYSnnn) assigned to the background 
partition. The minimum number is 10. The 
maximum numbers are 222 when MPS=BJF and 244 
when MFS=YES cr NO. See Note, which follows. 


If MPS=YES or BJF, specify the number of 
symbolic programmer logical units (of the class 
SYSnnn) for FI. If MFS=NO, FlPGR is net valid, 
and zero is assumed. The minimum acceptable 
value when MPS=YES cr EJF is 5. The maximum 
numbers are 222 when MPS=BJF and 244 when 
MFS=YES. See Note, which fcllcws. 


If MPS=YES or BJF, specify the number of 
symbolic programmer logical units (of the class 
SYSnnn) for F2. If MPS=NO, F2PGR is net valid, 
and zero is assumed. The minimum acceptable 
value when MPS=YES cr EJF is 5. The maximum 
numbers are 222 when MPS=BJF and 244 when 
MFS=YES. See Note, which fcllcws. 


Specify the number of Job Information Blocks 
(JIEs) fcr the system. One is required for 
each logical unit temporarily reassigned by a 
// ASSGN statement that differs from standard 
system assignment (i.e., established at IPL 
time). One JIB is required for each alternate 
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CHANQ= 


logical unit assignment. One JIB is required 
for each cpen 2311, 2314, or 2319 extent with 
the DASD file-protect feature except for system 
input/output extents. Two JIBs are required 
for each cpen 2321, cr 3330 extent with the 
DASE file-protect feature. The minimum value 
generated is 5. The maximum value generated is 
255. This parameter is discussed further in 
the DC S Sys te m Pr ogrammer's Guide , GC24-5073. 


6 cr 6+CBF ) 

n / Specify the number of entries in the channel 
queue. The minimum value generated is 6. If 
the assumed option is taken and CBF is 
specified, the assumed cpticn is six more than 
the CBF entry. The number of the channel queue 
should exceed the tctal number cf I/O requests 
you wish to accumulate simultaneously. The 
start I/O commands for all channels are stored 
in this queue. The maximum value is 255. This 
parameter is discussed further in the DOS 
§ZSt em_ Programmer ^_s_Guide. 


AS l 

ICDEV=\ n/ 


D2311= 

D2314= 

D2321= 

D3330= 

D2400= 

D3410= 

D3420= 



Specify the number of I/O devices attached to 
the system. The maximum is 255. The minimum 
value is 5. 

Note ; The sum of BGPGR + F1PGR + F2PGR LUBs 

must net exceed 222 when MPS=BJF and 244 
when MPS=YES. 


This parameter is used to reserve PUB2 Table 
space for devices that require more than the 
normal value of 12 bytes per device for each 
PUE2 Table entry. 

For each device or drive (for 2314/2319 cr 
3330) listed at the left, specify n, where n is 
the number of devices cr drives of that type 
attached to ycur system. If the device is not 
specified, the system assumes that no devices 
of that type are attached to the system. 
Hcwever, if nc disk devices are specified, the 
system assumes D2311=2. Likewise, if no tape 
devices are specified, D2400=4 is assumed. 

During system generation, the amount of 
space reserved for the PUB2 Table is 
calculated. An adequate amount of space is 
reserved for each device specified. Then, the 
total number of these devices is subtracted 
frem the tctal possible number cf I/O devices 
(IODEV=n) attached to the system, resulting in 
the number of devices fer which the normal 
amount of PUB2 Table space is reserved. 

Allcw additional PUB2 Table space for future 
expansion. If there is not enough PUB2 Table 
space available fer all the devices attached to 
the system at IPL time, the system is unable tc 
perform the IPL procedure. 
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DVCGEN 


The Device Generation (DVCGEN) macro instruction and its parameters 
define the physical input and cutput units attached tc the system. This 
macro instruction is optional. The DVCGEN macro is further discussed in 
the D OS S ys tem Programmer's Gui de. 


P ARAM ETERS FCR DVCGEN 


CHUN=X' CUU' # DVCTYP=XXXXXX f CHANSW=/NO lMODE=X'ss* 

\yesj 

CHUN=X'cuu' Specify the hexadecimal number of the channel 
and unit fcr the device. 

DVCTYP=xxxxxx Specify the device type. Figure 1-5 contains 
the cedes for each IBM-suppcrted device. 

/ NQl 

CHANSW=(YES/ Specify if the device is attached to more than 
one selector channel. This parameter indicates 
if the device can he switched (IBM 2816 (with a 
2403 cr 2803) , 2804, 2404, cr 3803 available). 

MCEE=X'ss' 1. 2400T9. MODE specifies the tape mode. 

X'CO' is the default value. For 800 hpi 
9-track single density, specifying X'C8' 
saves time during tape OPEN. 

2. 3410T9 or 3420T9. MODE specifies the tape 
mode. X'c0' is the default value. 

3. 2400T7, 3410T7, or 3420T7. MODE specifies 
the tape mode. X'90' is the default value. 

4. 2702. MODE designates the SADxxx command. 
X'00' is the default value. 

X'00' SADO 
X'01' SADI 
X'02' SAD2 
X'03' SAD3 

See I PL Cent r e! and AS SGN Statements for 
System G ener a tic n fcr ether values of ss. 

5. 2260 (Local) and 3270 (Local). MODE 
specifies the 1053, 3284, cr 3286 printer 
when CHUN=X'cuu' refers to a 1053 attached 
tc a 2848, a 3284 attached to a 3272, or a 
3286 attached to a 3272, respectively. The 
operand must he entered as MODE=X'01'. 

6. 1419/1255/1259/1270/1275. MODE designates 
the external interrupt hit associated with 
magnetic ink character readers or optical 
reader/sorters. The mode X'01' through 
X'20' corresponds tc external interrupt 
PSVis tits 26 through 31, respectively. Fcr 
dual address adapter 1419, this parameter 
is needed for both 1419P and 1419S. 

X'01' Device attached tc external line 7. 
X'02* Device attached to external line 6. 
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7. 


X * 04 * Device attacned tc external line 5. 

X'08' Device attached to external line 4. 

X'10' Device attached tc external line 3. 

X'20* Device attached to external line 2. 

1018. MODE specifies whether the 
error-correction feature is present or not. 
X'00' is the default value 
X'01' feature is present. 


RULES FOR USING D VCGE N 


1. A separate DVCGEN iracrc instruction is required for each device. 

For a 2314, 2319, or 3330 each individual unit needs a DVCGEN card. 

2. The total number must net exceed the total number of devices 
specified in the IODEV parameter of the IOTAE iracrc. 

3. DVCGEN macros must be specified in ascending channel address 
sequence. 

4. Switchable units (attached to more than one selector channel) must 
be defined only once on the lowest channel by which they are 
addressable. They cannot be redefined as ncnswitchable units cn the 
higher channel. 

5. The sequence of the DVCGEN cards determines the priority of the 
devices cn their channel. SYSRES should be the first DVCGEN card if 
it is to have the highest priority for that channel. Switchable 
units must be the last devices specified for each channel and must 
be on consecutive channels. 

6. The specifications of these macros can be altered at IPL by ADD and 
DEL statements. 

7. IBM 3210/3215 Console Printer-Keyboards that are net cn-line but 
were defined by DVCGEN statements must be deleted by DEL statements 
when performing IPL from the card reader. 


ASSGN 


The Assign (ASSGN) macro instruction and its parameters assign symbolic 
device names (LUEs) to physical I/O devices (PUBs). A separate macro 
instruction is required for each symbolic device name with a standard 
system generation assignment. This macro instruction is optional. 


P ARAMETERS FOR ASSGN 


SYSnnn,X'cuu' 



,F2j Symbolic name may be any of the following 
system logical units cr programmer logical 
units: 


SYSRDR SYSLST 
SYSIPT SYSLCG 
SYSFCE SYSLNK 


SYSREC 

SYSRIE 

SYSSLE 

SYS000-SYS221 (if MPS=EJF) or 

-SYS243 (if MPS=N0 cr YES) 
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X'cuu ' is the hexadeciiral nuirfcer of the channel 
and unit to which the symbolic device is 
attached. A separate iracrc is required for 
each standard assignment desired. 

BG, FI, or F 2 specifies the partition to which 
the assignment is being made. To make standard 
foreground assignments at system generation 
time, MPS=YES or BJF must be specified in the 
SUPVR macro. The ASSGN macrc is ignored if an 
invalid partition specification is entered. 

Making a standard foreground assignment at system generation time is 
equivalent to making a permanent assignment after IPL (exception noted). 
When you use single program-initiated foreground partitions, the 
assignments are released at the end of the first jcb unless the HOLD 
command is issued. Also, when you unbatch a foreground partition, the 
assignments are released at the end of the jcb unless the HOLD command 
is issued. 

System input/output units (SYSRDR, SYSIPT, SYSLST, cr SYSPCH) that 
are assigned to a tape or DASD when the system is generated are 
unassigned by IPL. An unassigned device can cause a jet to be canceled. 

N otes 

• During system generation, conflicting assignments (ASSGN macrc 
specifications made in the supervisor assembly) across partitions are 
not checked. 

• If SYSLOG is assigned to a foreground partition, it mu st also be 
assigned in the background partition. 

• SYSIN and SYSOUT cannot be specified in the ASSGN macro. 

• If SYSCLB is assigned, the assignment is ignored. 

• Compile, link-edit, and go in a foreground partition is only allowed 
if a private core image library is supported and available. 

Therefore, SYSLNK can only be assigned tc a foreground partition if 
PCIL=YES and MPS=BJF have been specified. 


44 DOS Version 4 System Generation 



SEND (n) 


The Supervisor End (SEND) iracro instruction indicates the address at the 
end of the supervisor. n is a irultiple of 8 and cannct he greater than 
30,720. 

The steps in this section are a general guide tc the use of the SENE 
macro. By following this procedure, you can generate a desirable 
supervisor without having tc examine all aspects of the SEND macro. The 
full description of the SEND macro follows these steps. 


For a Mul t ipr og ramming Sy s tem 


St ep 1: Assemble the supervisor with no SEND address specified. The 
address of NUCEND will equal the address of SYSEND. 

St ep 2: If PTO is specified or assumed YES (if IDRA=YES, PTO is 
forced), be sure the PTA (physical transient area) is storage protected. 
To do this, add 400 (hex) to the PTA address, then subtract this sum 
from the address of EOSSP. 

If the difference is zerc or positive, the PTA is storage protected 
(as in Figure 1-2C or 1-2D). Go to Step 3 if the difference is zero or 
positive. 

If the difference is negative, the PTA is not storage protected 
(Figure 1-2 e). In this case add at least the difference between ECSSP 
address + 8 and the PTA address tc the PPBEG address, and make the 
decimal equivalent the SEND address. Thus: 

SEND address = PPBEG ADDRESS + (EOSSP address + 8 less PTA 
address) 

The number of bytes added to the PPBEG address is reserved for future 
expansion of the supervisor (Figures 1-2H and 1-21) 

Go to step 4 if the difference is negative. 

S tep 3: Nhen the difference between the PTA+400 and ECSSP is zero or 
positive, examine for unused space (desirable if ycu wish to reserve 
room for future expansion of the supervisor without re-link editing your 
programs). Figure 1-2D shows unused space between the end of the 
supervisor and the beginning of the problem pregram area. To determine 
how much unused space exists, subtract the address of PPBEG from the 
EOSSP address. If the difference is greater than zerc, that result is 
the number cf bytes (in hexadecimal notation) of unused space. If you 
do not desire the extra space at this point, add the decimal equivalent 
to the PD=n specification in the FOPT macro. 

This extra space is then available for use by IBM personnel in 
servicing the supervisor until the time you feel it is necessary tc use 
a portion of that space in expanding your supervisor. For example, if 
you are to have PDAIDs running in your system, PD=800 is the minimum 
specification. If you find X'158' (decimal 344) bytes of unused space 
between PPBEG and EOSSP, specify PD=1144 (800 + 344). Ccntinue to Step 
4. 

St ep 4 : If you found no reason tc modify a parameter in Step 2 or Step 
3, continue with generation procedures. Otherwise, make the desired 
change and reassemble. Make sure that the NUCEND address is equal to cr 
less than the SYSEND address (this could happen with the SEND address 
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specified). If the NUCEND address is greater than the SYSEND address, 
add at least the decimal equivalent of the difference tc the specified 
SEND address and reassemble. You may wish at this time tc consider Step 
3 again. Also, if NUCEND is less than SYSEND (this can occur with the 
SEND address specified), scire extra space has teen generated and can he 
used to expand the supervisor. This can be left as is or added to the 
PD=n parameter as discussed in Step 3. 


N ote : To obtain more space for future expansion, you rray add 2nK bytes 

(decimal notation, where n>l) to the SEND address, provided you don't 
exceed the maximum of 30,720. 


F or a Non-Multiprogramming Syste m 

S tep 1: Assemble the supervisor with no SEND address specified. The 
address of NUCEND will equal the address of SYSEND. 


Step 2 : Make sure that the LTA (Logical Transient Area) is storage 
protected. You should do this by adding 4B0 (hexadecimal notation) 
to the LTA address; then subtract the result from the EOSSP address 


If the result is zero or positive, the LTA is storage protected. 
Proceed with step 3. 


If the result is negative, the LTA is not storage protected (Figure 
1-2B). In this case add at least the difference between EOSSP address + 
8 and the LTA address to the PPBEG address and make the decimal 
equivalent the SEND address. Thus: 


SEND address = PPBEG address + (EOSSP address + 8 less LTA 
address) 


The number of bytes added to the PPBEG address is reserved for future 
expansion of the supervisor. 


Step_3: If you reassembled with a SEND address specified, you need only 

make sure that the NUCEND address is not greater than the SYSEND 
address. Subtract NUCEND address from SYSEND address. If the 
difference is negative, add this amount (decimal equivalent) to the SEND 
address and reassemble and repeat Step 3. In actual practice, this 
should not occur, but it is wise tc check the addresses as a precaution. 


Note: To obtain more space for future expansion, you may add 2048 bytes 

(decimal notation) to the SEND address. 


Figure 1-2 illustrates supervisor storage generated by various 
combinations of n (SEND address), supervisor size, and storage 
protection boundary. 
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SE 


SYSSOO 


NUCEND 


SYSEND 


PPBEG 


EOSSP 




NUCEND = SYSEND 


Supervisoi 


Not Used 


- K Boundary 


Problem 

Program 



Protected 




SEND n 


NUCEND> 

SYSEND 


NUCEND 

SYSEND 


NUCEND< SYSEND 



Portion 

Overlaid 




Not 

Protected 




Figure 1-2. SUPERVISOR—Unprotected Supervisor Storage Generated 


The supervisor consists of two parts: 


1. The nucleus that extends from the address SYSSOO to NUCEND, and 


2. The area that extends from the address SYSEND to PPEEG. It consists 
of: 
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• The Independent Directory Read-In Area (Optional, IDRA=YES), 

• The Logical Transient Area (LTA), 

• The Physical Transient Area (PTA), 

• The Problem Determination Aids Area (Optional, PD=YES, or PD=n), 
and 

• The Background Save area. 

The End-of-Supervisor Stcrage-Protect (ECSSF) address is either: 

• the first 2K boundary after the address of the LTA - if MPS=NO was 
specified, or 

• the first 2K boundary after the address of the PTA - if either 
MPS =YES or MPS=BJF was specified. 


SEND 

If the operand n is not specifie d (F igure 1-2 B) , the address of 

N UCEND equals the add r ess of SYS END. 

SENDn 

If the operand n is specified (Figures 1-2E through 1-21), the 

address of NUCEND can be greater than, equal tc, cr less than the 

address cf SYSEND. 

1. If NUCEND is greater than SYSEND (Figure 1-2E), a portion cf the 
transient area overlays the supervisor nucleus, n must be 
increased, and the supervisor reassembled. 

2. If NUCEND is equal tc SYSEND (Figure 1-2G), the result is 
identical to the case where n was not specified (see Figures 
1-2B, 1-2C, and 1-2D) and the effect is also the same. 

3. If NUCEND is less than SYSEND (Figures 1-2G through 1-21), the 
area between SYSEND and NUCEND is net used and is available for 
future expansion of the supervisor. The d ifference b etw een 
S YSEND and NUCEND is t he num be r of by t es t he supervisor m ay 
expand without ha v ing to rel in ka ge e dit prog r ams at the e n d of 
the supervisor . 

SENDn,NUCEND<SYSEND(Figures 1-2G, 1-2H, and 1-21) 

1. If the EOSSP address is less than the PPBEG address, the area 
between these two addresses is not storage-protected. (Figures 
1-2E and 1-2G). This happens if MPS=NC was specified, or if 
either MPS=YES or B!FS=EJF was specified and the EOSSP address is 
somewhere within the area that contains the Physical Transient 
Area (PTA), the Problem Determination Aids Area and the 
Background Save Area. 

2. If the EOSSP address is equal to the PPBEG address, the entire 
supervisor is storage-protected (Figures 1-2C and 1-2H). 

3. If the EOSSP address is greater than the PPBEG address, the 
entire supervisor is stcrage-protected. The area between the 
PPBEG address and the EOSSP address is not used and is available 
for future expansion of the supervisor. The difference between 
the EOSSP address and the PPBEG address is the number of bytes 
the supervisor may expand without having tc relinkage edit 
programs at the end of the supervisor. This expansion area is 
in addition to any area between SYSEND and NUCEND (Figure 1-21). 
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MAXIMUM UNPROTECTED STORAGE 


If a portion of the supervisor is not storage-protected (Figure 1-2B and 1-2G), 
that the unprotected area falls within the fcllcwing liirits. 


"T-T-T-1 

| PD=NO | PD=YES | PD=n | 


h- 

| MPS=NO 
| PTO-NO 
| FP=NO/YES 


2344 


3184 


2384+n 


| MPS=YES/BJF 
| PTO=NO 
I FP=YES 

1 -- 

| MPS=YES/EJE 
| PTO=NO 
| FP=NO 


1176 


2016 


1216+n 


1144 


1984 


1184+n 


I-- 

| MPS=YES/BJF 
| PTO=YES 
| FP=YES 

h 


120 


960 


160 + n 


MPS=YES/EJF 

PTO=YES 

FP=NO 


88 


928 


128 + n 


Figure 1-3. SUPERVISOR—Maximum Unprotected 
Area between ECSSP and PPBEG 
(End of Supervisor) Address 


Figure 1-3 
EOSSP address 


shows the maxiiruir number of bytes in the area between the 
and the PPBEG address that may be unprotected. 


verify 
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Operation 

Operand 

Explanation 

SUPVR 


Supervisor macro instruction. 


SYSTEM=DISK 

Specify a disk - resident supervisor. 

SYSTEM=DISK is assumed if this parameter is omitted . 



Specify if there is to be multiprogramming support. When YES or BJF is specified, the system generated is capable of 
supporting two foreground programs. YES or BJF must be specified if TP=QTAM. BJF must be specified if batched 
job environment is desired for foreground partitions. 


i— 1 

T p= BTAM ( 

) QTAM t 
f QTAMn ) 

Specify if teleprocessing support is desired and if so, whether Basic or Queued Access Method (BTAM or QTAM) is 
desired. When QTAM is specified, SVC support for BTAM is also included, n is the maximum number of problem 
programs in the system at one time, n may be any value 2 to 12. (For multitasking, AP must equal YES.) 


(NO 1 

MirR _ . 1412 ( 

MICR ~ ) 1419 l 
' 1419D ' 

Indicates whether the supervisor is to support magnetic ink character readers or optical reader/sorters. If 1412/1419s 
or 1255/1259/1270/1275s are attached to the multiplexor channel, the PIOCS parameter BMPX=YES is not supported. 


ASCII {£§} 

Specify YES, if supervisor support of ASCII-code is desired. 


"-{Sg} 

Specify if there is to be multiprogramming within a partition (multitasking) support. Multiprogramming within a 
partition provides the ability to execute more than one program (multitasking) within a partition. MPS = YES and 
WAITM=YES are assumed ifAP=YES. 


- - {£§-} 

EU f YES must be specified if mixed parity tape processing is required for the emulators, the tape 
preprocessor and tape postprocessor programs. 


E«RL°G.{^.} 

YES provides Recovery Management Support Recording ( RMSR ). RDE provides both RMSR and 
the Reliability Data Extractor ( RDE ). 

CONFG 


Describes the hardware features. 


(135) 

MODEL =h 45 S 

*155* 

Specify the model number. 


Sp = {^s} 

Storage protection feature. YES must be specified for MPS or BJF. 


™-m) 

Decimal feature. 


pp -{^} 

Floating point feature. 


POR T -{tf } 

If you specify MODEL = 145, then PORT = 155 can be specified to provide support for the extended logout area of 
the Model 155. This allows the MCAR/CCH functions of the supervisor you are generating to be CPU independent. 


Figure 1-4. SUPERVISOR—Macro Instructions (Part 1 of 4) 
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Operation 

Operand 

Explanation 

STDJC 

/ YES 
DECK= { no 


Specify standard settings for job control. 

Output of object modules of language translators on SYSPCH. 

LIST - 


Source module listings and diagnostics from language translators on SYSLST. 

US'X- {£§ 


Hexadecimal object module listings from PL/l (D) and COBOL on SYSLST. 

SVM= 


Assembler and PLI (D) outputs symbol tables on SYSPCH: COBOL-D compiler outputs DATA DIVISION map on 
SYSLST. The American National Standard COBOL compiler produces a data division glossary. 

XREF= 

Assembler and American National Standard COBOL Compiler outputs symbolic cross reference lists on SYSLST. 

KR5 - { rTO 


COBOL, PL/l (D), FORTRAN, and Basic FORTRAN summarize all errors in source programs on SYSLST. 

CHARSET= {H} 

Specify the 48 - or 60-character set for PL/l (D) input on SYSIPT. 

— { 1 - 


Listing of all control statements on SYSLST. 

DUMP- 


Dump of registers and main storage on SYSLST. 

LINES= {f } 


Number of lines per page on SYSLST . 

r,ATc- i MDY 
DATE " l DMY 

} 

Format of the date . 

SPARM = 

} 

Support of Assembler variable symbol &SYSPARM. 

FOPT 



Specify optional support in the supervisor. 

STXIT option is available for external interrupt (except timer). YES is required for tape compare utility program. 

„ \wl 
i 

STXIT option is available for interval timer interruption in the area specified. TIMER=YES is assumed. 

RC = {v^ 


STXIT option is available for program check interruption. Included in supplied supervisor because FORTRAN, 

COBOL-D, RPG, QTAM, PL/l and Autotest require PC = YES. 

™- {^} 


Specify if tape error statistics are to be accumulated and logged for the 2495 Tape Cartridge Reader where n is the 
number of tape cartridge readers attached to the system. 

Allow extra TEBSs for future expansion of the system. 

TEev - {f R ! 


Specify the type of error recording ( Combined Recording or Individual Recording ) to be performed for unlabeled 
or nonstandard tapes. 

E «={(^} 


Specify if error volume analysis is supported, r is the read error parameter; w is the write error parameter; and n is 
the number of tape drives attached to the system. ** 

(NO | 

SKSEP=<YES > 

v. n 


Specify if SEEK's are to be separated from the remainder of channel programs. Seek separation allows other devices 
on the channel to be accessed (including other seeks) during the seek. YES indicates support for all DASD type 
devices specified by the DVCGEN macro of system generation time . n is the number of DASD devices to be sup¬ 
ported and cannot be less than the number of DASD devices specified at system generation. The maximum number 
is 254. 

~ {£} 


Specify the number of bytes to be allocated to the problem determination programs. 800 is the minimum number 
of bytes that can be specified. Specification of YES provides the minimum number of 800 bytes. 

(— 1 

JA= 6 YES S 

l (n|,n2,n3)‘ 

Specify if the job control job accounting interface is to be supported. 


Figure 1-4. SUPERVISOR—Macro Instructions (Part 2 of 4) 
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Operation 

Operand 

Explanation 

FOPT 

(Continued) 

JALIOCS* < NO \ 
t (r», # r»2) / 

Specify for support of user-written job control job accounting interface routines containing LIOCS, and LIOCS with 
label processing. 

PTO= (- 

NO 1 
y'ES / 

Specify if the physical transient overlap feature is to allow the system to select tasks while FETCH is reading a 
fetched (or loaded) phase from the system residence file, or while I/O operations are performed during error re¬ 
covery procedures. 

IDRA= {v§} 

Specify if the independent directory read - in area (IDRA) is desired. If so, MPS must equal YES or BJF and PTO^YES 
is assumed . 

OLTEP= } 

Specify if the on-line testing function is desired. If OLTEP YES, then OC YES is forced. 

RETAIN 


Specify YES if the data link to the Remote Analysis Center is to be supported. The RETAIN function is 
available in the USA only. 

PCIL= \ 

NO 1 

YES / 

Specify if private core image libraries are to be supported. This allows the user to assign a private core image 
library. 

CBF= ■( 

f 3 } 

Specify if I/O requests ore to be appraised for console buffering and indicate the number of buffers (1-50) to be 
generated. 

CCHAIN= 

Specify if command chaining support for retry on I/O operations is to be handled. 

TRKHLD* 

S 

When processing sequential disk workfiles or updates of direct access files, specify if a hold is to be placed on the 
track of the record being read. The hold prevents anyone else who is using track hold from accessing that track. 

The maximum number of tracks that can be held at one time is 255 and the assumed value is 10. 

A ‘" {7 

Psl 

Specify if the abnormal termination exit function is to be supported. The abnormal termination exit allows the user 
to exit to a user's routine before an abnormal end of job causes a progrom to be cancelled. Specify YES for 

American National Standard COBOL I/O error recovery. 

WAITM= 

Specify if the multiple wait function is to be supported . This function allows the user to use the WAITM macro to 
wait for one of a number of events to occur. 

DASDFP= 

r 9 [ n "h) 

H& 4 ) 

' (3330 >' ) 

Specify if supervisory DASD file protection is handled where n,n indicates the range of channels to which DASDs 
may be attached. Either 2311 or 2314 indicates file protection for 2311, 2314, and 2319. 3330 indicates file 
protection for 2311, 2314, 2319, and 3330. 2321 indicates file protection for all DASD devices. 

NO 

Specify if system input and system output ( SYSRDR, SYSIPT, SYSLST, SYSPCH ) files may be assigned to a disk 
device. Specification of YES, 2311, or 2314 gives support for all disk devices 

nl - residual capacity for beginning of operator notification where SYSLST assigned to a disk device. 

100 nl 65535. Ifni is omitted, 1000 is assumed. 

n2 = residual capacity for beginning of operation notification where SYSPCH assigned to a disk device. 

100 n2 65535. If n2 is omitted, 1000 is assumed. 

Note: If neither nl nor n2 is specified, the operand need not be placed between parentheses ( ). 

PIOCS 



{Eg} 

Specify if the supervisor is to provide time - of - day clock support. 

ZONE* 

NO > 

EAST! ,hh, mmU 
(WEST) p 

Specify the difference between Greenwich Mean Time and local time in hours (hh) and minutes (mm). 

Use EA5T for areas east of Greenwich and WEST for areas west of Greenwich. If TOD^NO is specified, 

ZONE=NO is assumed. 


Define options and configuration requirements to be included in physical IOCS. 

SELCH= -j 

YES ) 

NO / 

Specify if selector channels are attached to the system. 

BMPX= j 

NO \ 

YES / 

Specify if burst mode devices on multiplexor channel is supported. If 1419s or 1255/1259/1270/1275s are 
attached to the multiplexor channel BMPX =YES is not supported. 

( 

CHANSW= T RWTAU > 

I tswtch) 

Specify if channel switching. For a 2404 or 2804 enter CHANSW-RWTAU . Enter CHANSW =TSWTCH for a 

2816 ( with a 2403 or a 2803, or a 3803. 

(NO| 

TAPE* < 9 > 

( 7 ) 

Specify 9- or 7 - track tape. 7 indicates support for both. If TEB, TEBV, or EVA is specified and TAPE is not, 
then TAPE — 9 is assumed. 


M RS LCH=j^§j 

Specify if MICR device is on the selector channel. 

( can only be specified for the 1419 single-address device). 


i 33301 

DISK* < 2311 > 

*2314 > 

Specification of 3330 gives PIOCS support for all disk devices. Specification of 2311, or 2314, or omission of this 
parameter, gives PIOCS support for 2311 and 2314 only. 

ALLOC 

FI =nK,F2*nK 

Specify storage partitioning. 


Figure 1-4. SUPERVISOR—Macro Instructions (Part 3 cf 4) 
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Operation 

Operand 

Explanation 

IOTAB 

BGPGR = 

Define the necessary input/output tables for the system. 

Specify the number of logical unit blocks (LUBs) for programmer units, i.e., the number of symbolic programmer 
logical units (SYSOOO - SYSnnn). 

F1PGR {f} 

Specify the number of symbolic units of the class SYSnnn for FI . 

F2PGR= {f} 

Specify the number of symbolic units of the class SYSnnn for F2. 


Number of JIBs for the system. Minimum value generated is 5. 

CHANQ= } 

Number of entries in the channel queue. Minimum value is 6. 

IODEV= 

Specify the number of I/O devices attached to the system. The minimum value is 5. 


023,4 '{I} 

02321 ' {f} 

D3330 = 

02400 -{£} 

034,0 -{r} 

03420 -{£} 

Specify the number of each of the devices listed that will be attached to your system. Specification of these 
parameters is required as each of these devices requires more than the minimum amount of 12 bytes for its 

PUB2 Table entry. 

DVCGEN 

(See note 1 ) 

CHUN = X'cuu' 

Specify the physical I/O units attached to the system. 

Hexadecimal number of channel and unit. 

DVCTYP =xxxxxx 

Specify the device type. See Figure 1-5. 

chansw= { 7 ^} 

YES indicates that the device is attached to more than one selector channel (the device is switchable). 

MODE = X'ss' 

1. 2400T9. MODE is used to specify the tape mode. X'CO' is the default value. 

2. 3410T9 or 3420T9. MODE specifies the tape mode. X'CO 1 is the default value. 

3. 2400T7 or 3420T7. MODE is used to specify the tape mode. X'90‘ is the default value. 

4. 2702. MODE designates the SADxx command. X'00' is the default value. X'00’SADO, X'OI'SADl, 

X'02' SAD2, X'03' SAD3, 

5. 2260(t-ocal) and 3270(Local). MODE is used to specify the 1053, 3284, or 3286 printer when CHUN = X'cuu' 
refers to a 1053 attached to a 2848 or to either a 3284 or a 3286 attached to a 3272. 

This operand must be entered as X'01'. 

6. 1419, 1255, 1259, 1270, 1275 MODE designates the external interrupt bit associated with magnetic ink 
character reader. 

X‘01' External line 7 X'04‘ External line 5 X’lO' External line 3 

X'02 1 External line 6 X'08' External line 4 X'20' External line 2 

7. 1018. MODE specifies wether the Error Correction feature is present or not. X'00' is the default value. 

The operand must be entered as X '01' if the feature is present. 

ASSGN 

[MSI 

SYSnnn, X'cuu'1, FI J 

Assign LUBs to PUBs as standard system assignments. 

Symbolic unit is assigned a hexadecimal channel and unit number within a partition. 

SEND 

["] 

End of supervisor macro instructions, n = beginning address of the problem program area. 


Note 1 : Rules for using DVCGEN 


1 . A separate DVCGEN macro instruction is required for each device. 

2. The total number of DVCGEN macros must not exceed the total number of devices specified in the IODEV parameter of the IOTAB macro. 

3. DVCGEN macros must be specified in ascending channel address sequence. 

4. Switchable units (attached to more than one selector channel) must be defined once. They are defined on the lowest channel on which they 
are addressable. 

5. The sequence of the DVCGEN cards determines the priority of the devices on their channel. Switchable units must be the last devices for 
each channel, and must be on consecutive channels. 

6 . The specifications of these macros may be altered by IPL ADD and DEL statements. See I PL PLM, GY?4*-5086. 

Note 2 : Rules for using ASSGN 

1. The ASSGN mocro allows SYSRDR, SYSLST, SYSPCH, and SYSIPT to be assigned to a tape or DASD. However, IPL unassigns any such 
assignments. 

2. SYSLOG must also be assigned in BG, if assigned in foreground partition. 

3. SYSLNK cannot be specified in either foreground partition. 


Figure 1-4. SUPERVISOR—Macro Instructions (Part 4 of 4) 
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Card Code 

Actual IBM Device 

Dev. Type 
XW 

Device Type 

2400T9 

2400T7 

9 - track Magnetic Tape Units 1 

7 - track Magnetic Tape Units ) 2400 ' SeneS 

9 - track 3410 Magnetic Tape Units 

50 

50 


3410T9 

53 

Magnetic Tape Devices 

3410T7 

7 - track 3410 Maqnetic Tape Units 

53 


3420T9 

9 - track 3420 Magnetic Tape Units 

52 


3420T7 

7 - track 3420 Magnetic Tape Units 

52 


2495TC 

2495 Tape Cartridge Reader 

51 

Tape Cartridge Reader 

1442N1 

1442N1 Card Read Punch 

30 


2520B1 

2520B1 Card Read Punch 

31 

Card Read Punches 

2596 

2596 Card Read Punch 

30 

3525RP 

3525 Card Punch ( with optional read feature ) 

23 



2501 Card Reader 

2540 Card Reader 

10 

11 

Card Readers 

3505 

3505 Card Reader 

12 


2540P 

2540 Card Punch 

21 


2520B2 

2520B2 CardPunch 

20 


1442N2 

1442N2 Card Punch 

22 

Card Punches 

2520B3 

2520B3 Card Punch 

20 


3525P 

3525 Card Punch 

23 


1403 

1403 Printer 

40 


1403U 

1403 Printer with UCS feature 

42 


1443 

1443 Printer 

41 


2245 

Kanji Printer 

44 


2260 ( local) 

1053 Printer with 2848 Control Unit. 

CO 

Printers 


MODE operand must be entered as X '01 1 



3211 

3211 Printer 

43 


3277 ( local 3270) 

3284 or 3286 Printer with 3272 Control Unit. 

B0 



MODE operand must be entered as X'01 1 



3277B 

3284 or 3286 Printer with 3272 Control Unit, 

B0 


( local 3270) 

attached in Burst Mode to a multiplexer 
channel. MODE operand must be entered 
as X‘01 1 



1050A 

3210, 3215 Console Printer Keyboards 

00 

Printer - Keyboards 

UNSP 

Unsupported Device 

FF 

Unsupported No burst mode on multiplexor 
channel 

UNSPB 

Unsupported Device 

FF 

Unsupported with burst mode on multiplexor 
channel 


2311 Disk Storage Device 

2314 Direct Access Storage Facility 

60 

62 


2314 

2319 Disk Storage Facility 

62 

DASD 

2321 

2321 Data Cell Drive 

61 


3330 

3330 Disk Storage 

63 



1255 Magnetic Character Reader 

1259 Magnetic Character Reader 

mm 


1419 

1419 Magnetic Character Reader 

72 

MICR - Magnetic Tape Character Recognition 

mmm .- 

1419 Dual Address Adapter Primary Control Unit 

73 

Devices 

mmm 

1419 Dual Address Adapter Secondary Control Unit 

74 



Figure 1-5. SUPERVISOR—Device Cede (Part 1 cf 2) 
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Card Code 

Actual IBM Device 

Dev. Type 
XW 

Device Type 

2 

701 

2701/2715 Data Adapter Unit 

DO 

Teleprocessing lines 


( A 



| A = SAD0 command when enabling the line 

2 

702) B 

2702 Transmission Control Unit 

D1 

1 B = SADI command when enabling the line 


C 



1C = SAD2 command when enabling the line 


*D 



(D = SAD3 command when enabling the line 

2 

703 

2703 Transmission Control Unit 

D2 


2955 

2955 Data Adapter Unit 

D7 

Data Link for RETAIN 

1 

017 

101 7 Paper Tape Reader with 

78 




2826 Control Unit Model 1 



1 

017TP 

1017 Paper Tape Reader with 

D5 

Paper Tape Readers 



2826 Control Unit Model 2 



2 

671 

2671 Paper Tape Reader 

70 


1 

018 

1018 Paper Tape Punch with 

79 




2826 Control Unit Model 1 



1 

018TP 

1018 Paper Tape Punch with 

D6 

Paper Tape Punches 



2826 Control Unit Model 2 



■ 

419 

1270 Optical Reader Sorter 

mm 



419P 

1275 Optical Reader Sorter 


Optical Readers 

1 

287 

1287 Optical Reader 

77 


\m 

288 

1288 Optical Page Reader 

77 


2260 

2260 Display Station 

CO 


3277 

3277 Display Station; MODE 

BO 

Display Stations 

(local 3270) 

operand need not be entered 



3277B 

3277 Display Station; attached in Burst Mode 

B0 


(local 3270) 

to a multiplexor channel. MODE operand 





need not be entered 



7770 

7770 Audio Response Unit 

D3 

Audio Response Units 


Figure 1-5. SUPERVISOR—Device Code (Part 2 of 2) 
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Supervisor Main Storage Requirements 


This section contains the data required for estimating the size of the 
supervisor required for a generated system, and the amount of main 
storage required at object time fcr the supervisor macro instructions. 

The supervisor size can determine the size cf the available 
problem-program area. Note that the background problem-program area 
must be at least 14,336 bytes when the disk operating system is used. 

If Assembler F is part of the system, the minimum background area must 
be 45,056 bytes. The supervisor varies in size from system to system 
according to the options chosen by the user and to the machine 
configuration. 

Figure 1-6 gives the main storage requirements for the base 
supervisors and the elements that can be included in a tailored 
supervisor. The base supervisor requirement (MOBEL=135) for the batched 
job system is 10,896 bytes. Additional storage requirements must be 
added to the base requirement fcr each additional supervisor element 
desired that is not within the base requirement. For example, for 
OC=YES (FOPT) under batched job system, add 136 bytes tc the base 
storage requirement (10,896 bytes). The base requirement for the 
MPS=YES supervisor is 11,766 bytes. Fcr TP=ETAM under NFS=YES, add 568 
bytes to the base requirement for the WPS supervisor. Thus, an MPS 
supervisor that includes BTAM requires 12,334 bytes (see Figure 1-6). 
(Note that QTAM requires an WPS supervisor.) Thus, by the time the 
supervisor is tailored to the installation requirements, it is usually 
larger than the base requirements. 

Note the relationship between the actual number of bytes in the 14K 
supervisor shipped by IBM and the number of bytes specified in the SEND 
macro for the supervisor. 


Size of Supervisor Address Specified 

Shipped by IBM (in by te s) In S END Macro _( in b y tes ) 

14,336 14,336 

The SEND macro specifies the beginning of the problem program area to 
facilitate system generation. Depending on the combination of 
supervisory functions chosen, a supervisor greater than 14,336 bytes may 
be generated. 

Note : All supervisor generation options are described earlier in this 

module under P lann i ng a Super visor. 
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Supervisor Element 


Generation 

Operand 


1-T- 

| YES | BJF 

+-j-- 

| 11,766 | 12,240 


Required Routines (Basic 
Size)-SUPVR 

SVC Interruption Handling 
System Loader (FETCH and 
LOAD) 

I/O Units Control Tables 
(LUES, PUES, and JIBS) 
General Entry and Exit 
Routines 

Communication Region 
Transient Area 
End of Job Step 
Physical IOCS (including 
Selector Channel 
Support) 

Storage Protection 


Optional Routines 


10,896 


ASCII 


Magnetic Character Options 


Teleprocessing Options 
BTAM 
£TAM 


I/O Error Log (Note 9) 
Option (RMSR and RDE) 

Multitasking 


1401/1440/1460 and 
1401/7010 Emulator 


ASCII=YES 

MICR=1419 

(fcr 1255/1259/1270/ 
1275, see Note 1) 

MICR=1419D 


TF=ETAM 

TP=QTAM 

TF=£TAMn (Note 2) 
ERRLCG=YES, or RDE 


AP=YES 

(Includes WAITM=YES) 
EU=YES 

MODEL=l35, 145, 
or 155 


568 
1200 
1088+ (A] 


568 
1200 
1088+ tA] 


Figure 1-6. SUPERVISOR—Main Storage Requirements (Eytes) (Part 1 of *5) 
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Supervisor Element 


(Generation 
(Operand 



1 

i . . 

| NC 

| YES 

-L 

| EJE 

4- 

1 

Dnfiguraticn Options-CONFG 

t 

1 

t 

1 

T 

1 

1 

1 


Model 135 (Note 9) 

|MODEL=135 

(0 

|0 

|0 


Model 145 (Note 9) 

|MCEEL=145 

| 552 

( 552 

| 552 


Model 155 (Note 9) 

|MOEEL=155 

| 872 

| 872 

| 872 


Decimal Feature 

|DEC=YES 

|0 

10 

10 


Floating Point Feature 

|FP=YES 

10 

( 104 

(112 


Portability (Note 9) 

|PCRT=155 

| 320 

( 320 

| 320 



4- 

4- 

4- 

4- 

-4 


MPS = 


Functional Supervisor 
Options-FCPT 


(User Option to Handle 

j.- T -T- 

Operator 
Comm. |Prog Ck 


H+ 


Int Timer| 

f- 


X 

1 


1 


|CC=YES 

| 136 

| 160 

1 168 


1 

X 

1 


|PC=YES 

1 208 

I 240 

1 240 


1 


1 

X 

|IT=BG,F1,F2(Ncte 12) 

| 448 

I 456 

1 456 

X 

1 


1 

X 

(Note: If AP=YES when 

( 472 

I 496 

1 496 


I 

X 

1 

X 

j FC=YES , add 168 

I 488 

| 520 

1 528 

X 

1 

X 

1 


| bytes. 

| 248 

| 288 

1 304 

X 

1 

X 

1 

X 

| If OC=YES when 

( 512 

( 536 

1 544 


h- 


any MICR support 
is included, add 
32 bytes. 


Problem Determination 
Programs 


Seek Separation 


|PD=YE£ (Ncte 3) 

|PD=n (Note 3) 

j.- 

jSKSEP=YES or n 
|(Note 4) 

k - 

Physical Transient Overlap |PTC=YES (Note 5) 

h 

Independent Directory 
Read/in Area (Note 5) 


984 
n + 184 


992 

n+192 


1000 
n+ 200 


328 + 5n + 
tal + tb] 


328+ 5n + 
[a] + (b ] 


328+5n + 
[a] + tb] 


|ICRA“YES 


336 

760 


352 

776 


On-Line Testing 
RETAIN 

Private Cere Image Lib. 
Console Buffering 


h- 

|OLTEP=YES (Note 9) 

f- 

| RETAIN=YES 

- 

|PCIL=YES 

f- 

j CEF = n 

|n may be 1 to 50 
(buffers [if CHANQ is 
|not elected—Note 63 
.r_ 


416 

152 

248 


440 

168 

296 


438 

168 

384 


464+10bn+ 
[ 7n] 


O20+105n+ 

[7n] 


020+105n+ 
[7n 3 


Figure 1-6 . 


SUPERVISOR—Main Storage Requirements (Bytes) (Part 2 of 5) 


58 DOS Version 4 System Generation 


























r - 

"T 

T 



"1 


|Generation 

1 

MPS = 


( 

(Supervisor Element 

(Operand 

1 



1 


1 

*- 

T 

r 

H 


1 

(NO 

| YES 

| BJF 

1 

L . . 

1 


4 

I 

i 

V 

T 

1 

t ■ 

1 

1 

1 

+ 

1 

1 

1 

|Jot Accounting Interface 

1 

|JA=YES (Note 

1 

| 568 

1 

| 568 

1 

| 936 

1 

1 


| JA=(n x ,n 2 ,n 3 ) 12) 

|640+8 

(640+8 

|1040+8 

1 


1 

|(n x +n 2 +n 3 

) | (n;L+n 2 +n 3 

) ( (njn^n.i) I 


| JALICCS=(s,l) 

|value 

|value 

|value 



1 

|from JA+ 

jfrom JA+ 

jfrom JA+ 



1 

((s+l)-16 

| (s+l)-16 

((s+1)-16 



|(Note 11) 

i 

1 

1 

1 

1 


| Tiire-of-Day Clock 

i 

| T‘OD=YES 

| 712 

( 712 

1 

| 720 


| Support 

| ZONE= {(EAST, hh, rran)) 

1 0 

1 o 

1 o 



1 ((WEST ,hh ,mm)} 

1 

1 

1 

| 

1 

| 


(Multiple Wait (Note 7) 

1 

|WAITM=YES 

1 

1 56 

1 

| 48 
j 

| 48 

1 


|Abnormal 

1 

|AE=YES 

1 

1 

i 

i 

1 

1 


| Termination 

| (without AP=YES) 

| 352 

| 336 

| 344 



| (with AP=YES) 


| 616 
j 

| 6 00 


(Track Hold (Note 8) 

1 

|TRKHLD=n 

1 

1 

| 596 

| 604 



| (without AF=YES) 


| +12n 

j +12n 



|TRKHLD=n 

1 

| 716 

( 708 



| (with AP=YES) 

I 


j + 12n 

1 

| +12n 


(Tape Error Statistics by: 

i 

i 

1 

1 

1 

1 

1 

1 


(Unit, Volume, and EVA 

|TEB=n 

|28+6n 

|36+6n 

| 36+6n 


((Note 10) 

|EVA=r,w 

116 

1 16 

1 16 



|TEEV=IR 

1 0 

1 o 

|0 



|TEEV=CR 

|0 

1 o 

1 o 


1 _ _ _ 

l 

1 .. 

4 _ 


i 

r 

" 1' ... 

.t 

t 

1 . . 

i 

(Command Chaining 

|CCHAIN=YES 

I 

| 32 

1 

| 32 
j 

| 32 

i 


(Disk System Input and 

1 

J SYSFIL=YES 

| 416 

1416 

1 

1632 


| Output Files 

1 

1 

1 

1 



L 

4 . .. 

4. .. 

4 

i 


1 - 

T 

7 

T 


|EASE File Protection 

|DASDFP=n 1 ,n 2 ,dev 

| 446+ 

(430+ 

( 446+ 


| (with 2321) 

1 

|24(np-n, ) 

j 24(n 2 -n x ) 

| 24(n 2 -n A ) 



1 

t- 

-+- 

4 

H 

| (with 2311 or 2314) 

1 

| 374+ 

| 358+ 

| 366+ 



1 

| 24 (n 2 -n., ) 

|24(n 2 -n 1 ) 

j 24 ( n 2 -n x ) 



1 

l-- 

4 - - 

4 - - - 

H 

| (with 3330) 

1 

| 432+ 

| 424+ 

(424+ 



1 

| 24(n 2 -n 1 ) 

| 24(n 2 -n x ) 

1 24(n a -n, ) 



1 

t -- 

-4-- 

4 


| DASDFP (with 2321) 

1 

| 848+ 

| 832+ 

11048+ 


j including Disk SYSFIL 


( 24 (.n 2 -n ± ) 

( 24 ( n 2 -n! ) 

j 24(n 2 -n 1 ) 



1 

i - 

4 

4 

H 

| DASDFP (with 2311 or 2314) 

1 

| 776+ 

| 76 0+ 

1976+ 


j including Disk SYSFIL 

1 

J 24(n 2 -n x ) 

| 24 ( n 2 -n 1 ) 

| 24(n 2 -n x ) 



1 

- 

-4- 

4 

H 

| DASDFP (with 3330) 

1 

| 832+ 

| 800+ 

|1016+ 


j including Disk SYSFIL 

1 

|24(n 2 -n x ) 

j 24(n 2 -n x ) 

| 24(n 2 -n x ) 




x 

X 

X 

.j 


Figure 1-6. SUPERVISOR—Main Storage Requirements (Bytes) (Part 3 of 5) 
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I 



Supervisor Element 


Generation 

Operand 


F- 

| Jot Control Options-STDJC 
I Assembler SSYSPARM 
| support 

I (Other Job Control 
| options affect only the 
| contents pf the 
| communications region, 

I not its size.) 


4- 

I 

I 

ISPARM=YES 


KPS 


j.- 1 - T - 

|NO |YES |BJF 

4-4- 4 — 

1 I I 

I I I 

18 18 132 


Physical IOCS Support-PIOCS 


Selector Channel Support 

|SELCH = NO 

| -16 

|-32 

|-32 

Eurst Mode on Multiplexer 

|BMFX=YES 

| 40 

| 48 

| 48 

Channel 

1 

1 

1 

1 

Channel Switching Tape 

1 

1 

1 

1 

Control 

2404 or 2804 or 3803 

1 

|CHANSVv=RWTAU 

1 

|112 

1 

|136 

1 

| 136 

2816 only 

Tape Support (Note 10) 

| CHANSV\=TSV\TCH 

1 

|112 

1 

|136 

1 

j 136 

1 

7-track and 9-track, 
7-track only, or 

9-track only 

1 

|TAFE=7 ) 

|TAPE=9 j 

1 

j 40 8 

1 

! 408 

1 

J 408 

MICR device on selector 

1 

1 

1 

1 

channel 

|MRSLCH=YES 

| 32 

| 40 

| 40 


|DISK=2311 

1 o 

I o 

1 o 


|DISK= 2314 

1 o 

1 0 

1 o 


|DISK=3330 

|624 

I 632 

! 632 


4 

I 

I 

I 

I 

I 

\ 


1- 

1 

1- 

1 

Allocate 

4 

|ALLOC 

1 

4 

|0 

i 

4 

!° 

4 

|0 

1 

Input/Output Tables-ICTAB 

r 

1 

i ■■■ ■■ .. 

1 

i 

T 

1 

1 

Number cf I/O devices on 

|IOCEV=n 

|8(n-10) 

|8(n-10) 

| 8 (n-10) 

1 

system 

1 

1 

1 

1 

1 

Number cf programmer 

|BGPGR=n 

|2(n-10) 

|2 (n-10) 

|2(n-10) 

1 

logical units 

|F2FGR=n 

1 

| 2 (n- 5) 

| 2(n-5) 

1 


| FlPGR=n 

1 

|2 (n-5) 

|2(n-5) 

1 

Numoer of Channel Queue 

| CHANQ=n 

| 7(n-6) 

| 7(n-6) 

| 7(n-6) 

1 

Entries 

| (without 

1 

1 

1 

1 


| AF=YES) 

1 

1 

1 

1 


j (Note 6) 

1 

1 

1 

1 


| CHANQ=n 

1 — 

| 8 (n- 6) 

| 8(n-6) 

1 


| (with 

1 

1 

1 

1 


| AF=YES) 

1 

1 

1 

1 


| (Note 6) 

1 

1 

1 

1 

Number of Job Inforiraticr 

| JIE=n 

| 4 (n-5) 

| 4 (n- 5) 

| 4(n-5 ) 

1 

1 

Blocks 

1 

1 

| 

1 

1 

1 

1 

Amount of extra space 

1 

|D2311=nl 

1 

|+24nl 

1 

j +24nl 

1 

j +24nl 

1 

reserverved for the PUB2 

|D2314=n2 

|+24n2 

|+ 24n2 

|+24n2 

1 

Table (required for RMSR 

|D2321=n3 

|+24n3 

|+24n3 

| +24n3 

1 

recording) 

| D3 33 0=n4 

| +32n4 

| +32n4 

| +32n4 

1 


| D2400=n5 

| +52n5 

|+ 52n 5 

| +52n5 

1 


| D3410=n6 

| +60n6 

| +6 0n6 

| +60n6 

1 


| D3420=n7 

J +60n7 

j +6On7 

| +6On7 

1 


| IOEEV=n 

| +12B 

| +12B 

| +12E 

1 


| (E=n- (nl+n2 

1 

1 

1 

1 

L 


j +n3+n4+n5+n6+n7) 
l 

1 

X 

1 

X 

1 

X 

Figure 1-6. SUPERVISOR — Main Storage Requirements 
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I 
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I 

| Note 

I 
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I 

| Note 

! 

I 

! 

I 

I 

I 

I 
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| Note 

I 

| Note 

I 

I 

I 

| Note 

I 

I 

I 

| Note 

I 

| Note 

I 

I 

| Note 

I 

L_ 
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1. A 1255/1259/1270 is addressed as a 1419 single address adapter machine i.e., j 

MICR=1419. | 

2. MPS=YES or BJF is required for TP=QTAMn. TP=QTAMn includes ETAM Supervisor | 

support. j 

Telecommunications requires a minimum cf two channels: cne multiplexer | 

channel and at least one selector channel. Cne channel is required for | 

telecommunications and the other fcr the system r-esident device. j 

(Telecommunications should not be on the same selector channel as SYSRES.) | 

If AP=YES when TP=GTAKn, then the quantity A must be added to the basic | 

stcrage requirement for TP=QTAMn. A=44+ (n-2) 12, where n is the value elected j 
for TP=QTAMn. (Fcr multitasking, AP must equal YES.) | 

3. If PTO=YES when PD=n, add 8 bytes tc the PD stcrage requirement. In addition,! 

if any of the following options are elected along with PD, subtract 8 bytes | 
from the PD storage requirement under MPS=NC, or MPS=YES and subtract 24 bytesj 
frcm the PD storage requirement under MPS=EJF. j 

• Multitasking (AP=YES) | 

• Track Hold (TRKHLD=n) | 

• Abnormal Termination (AB=YES) | 

The number of bytes indicated is the current stcrage requirement, where n is a| 
minimum of 800 bytes. | 

4. When SKSEP=YES, n (in the formula) equals the number of DASD devices specified! 

at system generation time. When SKSEP=n, n (in the formula) is the number of | 
DASD devices supported as specified, but cannot be less than the number | 

specified at system generation time. In either case, a (in the formula) is | 

the 8 bytes required if DASDFP and/or SYSFIL options are selected, and b (in | 
the formula) is the 8 bytes required if Teleprocessing (TP) cpticn is | 

selected. j 

5. PTO=YES requires that MP£=YES or MPS=BJF for Physical Transient Overlap (PTO) j 

support to be generated. If IDRA=YES and PTO is not specified, then PTO=YrS | 
is assumed. | 

6. The selection of the CBF option results in extra channel queue usage. | 

Consider this when requesting the number cf CHANQ entries. Thus, | 

specification of the CBF option and selection of the CHANQ default, which is 6| 
channel queue entries, results in the number cf buffers specified being added | 
tc the CHANQ default. However, when both the CBF and CHAN^ cpticns are | 

specified, the number cf CHANQ entries desired should be increased by the | 

number of buffers specified. Otherwise, the number of entries generated in | 
the channel queue will be less than desired. | 

7. WAITM=YES is assumed when AP=YES. | 

8. Where n equals the maximum number cf tracks (1-255) tc be held at any given | 

time by the entire system. The default is 10 if n is an invalid parameter j 
(non-numeric or outside the range, 1-255). | 

9. The MCDEL=155 main stcrage requirements include the storage required by ERkLOG| 

and OLTEP. The MODEL=155 storage estimate also includes the storage required | 
by PORT. " | 

10. If EVA is specified and TAPE is not, TAPE=9 is assumed. | 

11. If s is omitted cr if its specification is invalid, then 16 bytes are | 

reserved. If 1 is omitted or if it is invalid, 0 is assumed. j 

12. The Timer feature is automatically generated if the interval timer (IT=BG, FI,| 
or F2) and/or Jot Accounting Interface (JA=YE£, or JA=nl,n2,n3) are supported.j 

-j 
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Supervisor size increases are net necessarily linear. For example, 
compare the size requirements of the separate entries CC=YES and PC=YES 
with the combined entry OC=YES,FC=¥ES. Combinations cf elements may 
result in an actual supervisor size that is smaller than the calculated 
total derived for the same supervisor. 

The I/O unit control tables in the IBM-supplied supervisor contain 
entries for up to 10 physical units and the first 10 programmer logical 
units. (See the DOS System Control and Service publication for a 
discussion of these tables.) 

The I/O table provides six channel queue pcsiticns and five Job 
Information Blocks (JIBs). As a minimum, 12 I/O devices and program 
check interrupts can be included within a 14,336 byte supervisor. 

A DOS supervisor generated with any of the following options requires 
a minimum of 14,336 bytes: 

• Multiprogramming (See Note) 

• Telecommunications 

• EASD File Protection 

• Disk System Input/Output 

• 1255/1259/1419 Magnetic Character Readers cr 1270/1275 Optical 
Reader/Sorters 

N ot e: If multitasking is also specified, the minimum supervisor size 

becomes 16,384 bytes. 

If foreground areas are net used, the batch-job supervisor would 
probably be more useful because the multiprogramming supervisor requires 
additional space and time tc perform its functions. 
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Computing the Size o£ a Supervisor 

As an example, assume a supervisor is generated using the macros shown 
in Figure 1-7. The size of this supervisor is determined as follows: 


GENERATION OPERAND MAIN STORAGE 

REQUIREMENT (bytes) 


SUP VR 

MPS=YES 11.776 

CONFG 

MODEL=135 0 

DEC=YES 0 

FP=YES 104 

STDJC 0 


FOPT 

IT=BG 
PC =YES 
OC=YES 
CCHAIN=YES 

DASDFP=(1,2,2321)) (832 + 24(2-1)] 

SYSFIL=YES / 

TEBV=IR 

JA=YES 


536 

32 

856 

0 

568 


PIOCS 

CHANSW=RWTAU 
TAPE=7 
BMPX=YES 
DISK=3 330 


136 

408 

48 

632 


IOTAB 

JIB=10 

CHANQ=10 

F1PGR=8 

F2PGR=8 

IODEV=10 

BGPGR=10 

D3330=2 

D3410=l 

D3420=l 


4 (n- 5) = 

7(n-6) = 

2(n-5) = 

2(n-5) = 

8 (n-10 ) = 
2 (n-10) = 


20 

28 

6 

6 

0 

0 See No te . 

64 

60 

60 


Total Number of Eytes 15.340 

Note : If entry for BGPGR is below minimum requirement, n=10 is assumed. 

The following MNOTE is obtained for an entry of less than 10. 

BGPGR SPECIFICATION BEIOW MINIMUM - "10" ASSUMED 
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X 


r- 

|// EXEC ASSEMELY 
I SUPVR MPS=YES 

| CCNFG MODEL=135,DEC=YES,EP=YES 

| STDJC LISTX=YES,LINES=46 

| FOPT IT-BG,PC=YES / OC=YES,CCHAIN=YES,DASDFP=(l,2,2321), 

| SYSFIL=YES,TEEV=IR,JA=YES 

| PIOCS CHANSW=RWTAU f TAPE = 7,BMPX=YBS, DISK=3330 

I ALLOC Fl=14K,F2=14K 

| IOTAE JLB=10,CHANQ=10,FlPGR= 8 , F2PGR=8 # ICDEV=10,BGPGR=10, X 

I D3410=l,D3420=1,D3330=2,D2321=1 

| DVCGEN CHUN=X'00C',DVCTYP=2540R 

| DVCGEN CHUN=X'00D',DVCTYF=2540P 

| DVCGEN CHUN=X* 0G£' , DVCTYP=3211 

| DVCGEN CHUN=X'0lF‘,DVCTYE=1050A 

| DVCGEN CHUN=X'190',DVCTYP=3330 

I DVCGEN CHUN=X'191',DVCTYP=3330 

| DVCGEN CHUN=X'192',DVCTYP=2321 

| DVCGEN CHUN=X'180' f DVCTYP=3410T9,CHANSW=YES 

| DVCGEN CHUN=X'181',DVCTYP=3420T7,CHANSW=YES 

| ASSGN SYSRDR,X* 00C' 

| ASSGN SYSIPT,X'00C' 

| ASSGN SYSPCH,X* 00D' 

| ASSGN SYSLST,X'00E' 

I ASSGN SYSLGG,X'OIF' 

| ASSGN SYSREC,X'190' 

| ASSGN SYSLNK,X'191' 

j ASSGN SYS001,X'191* 

I ASSGN SYS002,X'191' 

| ASSGN SYS003,X'191' 

j ASSGN SYS004,X'191' 

| ASSGN SYS007,X’192’ 

| SEND 16384 

j END 
/* 


Figure 1-7. SUPERVISOR—Example fcr Computing the Size cf a Supervisor 
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Planning an Operational Pack 


An op eratio nal syste m is one used in day-to-day operations that contain 
a tailored supervisor and libraries appropriate to each customer's 
particular combination of systeir programs and application programs. A 
system maintenance vo lume is one used primarily to facilitate changes tc 
programs supplied by IBM. Application programs can also be added to a 
maintenance volume for ease cf program maintenance. 

Ch ange D ist ributi ons are these changes supplied by IEM tc the 
IBfl-shipped volume. 

Proper planning is the key to successful system generations. The 
time spent in planning can save you frustration and valuable time. 
Planning should reflect the initial, intermediate and ultimate capacity 
of the core image, relocatable and source statement libraries. Enough 
workfile capacity must be available throughout system generation for 
assemblies and linkage-edit steps. 

The module for each component should be used to determine its storage 
requirements. Figure 1-8 contains a summary cf the library and 
partition requirements for all components shipped with the disk 
operating system. Adjust the requirements you derived from this figure 
for any program products (separately purchased components) you are 
including. The IBM-supplied disk operating system contains a 14K 
supervisor for the 2311, 2314/2319, and 3330 resident systems. This 
supervisor is described further in Su pe rvi sor Nucleus 14K -3 70 N-SV -495. 


S TORA GE REQUIREME NTS FOR D ISK O PER ATING SYSTEM IBM -SU PPLI ED P ROG RAMS 

All IBM-supplied programs used with disk operating system that are 
language translators or utilities execute in the background partition. 
Figure 1-8 lists the minimum size background partition required. In 
addition, you can link-edit certain of the language translators and 
utilities to execute in a batched-jcb foreground partition. Minimum 
partition size is the same as that for the background partition. 
However, note that the background save area is contained within the 
supervisor, but that either foreground save area is located at the 
beginning of the partition, thus reducing the partition size by the 
length of the save area. Therefore, program execution in a foreground 
partition may require 2K mere bytes of storage than would be required 
for execution in the background partition. 
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* Transients 

♦♦The number of System Control Relocatable Library blocks includes only 
the IPL, Job Control, Linkage Editor, and Librarian Programs. 

+♦♦ For BOS and BPS Compatibility. 

Note: See Module 4, Compiler IOCS Modules , for the preassembled module 

names and usage. 
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♦American National Standard 

♦♦These books are the sample problems that are common to both assemblers. 
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♦Transients unique to that component. 

Note_l : This is the minimum partition size for the smallest 1410/7010 

program being emulated. For more information about storage require¬ 
ments, refer to the emulator publication listed in the Preface. 


Note 2: 


See Compiler_IOCS_Modules for the preassembled module names and 
usage. 
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Note_l; This is the formula to calculate the number of core image library 
blocks necessary for the configuration data sets: 


number of 

devices on system + 1 


6 


number of 
blocks 


Note_2_: The number of core image library blocks required for the On-Line 

Tests (OLTs) depends on the number of device types on the system 
and the number and size of the tests needed to test these devices. 
This information is in the write up that accompanies the tests . 
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* Transients 

** The number of relocatable library blocks for Group 1 includes the blocks 
required by common modules. The number of relocatable library blocks for 
Groups 2 and 3 represent the unique modules for that group. The common 
modules are discussed in their respective sections. 
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Planning the Libraries 

Twc types of IEM libraries are: 

1. Systeir libraries 

2. Private libraries 


SYS TEM LIBRARIES 

The system libraries are the cere image, the relocatable, and the source 
statement. The private libraries are the private core image, the 
private relocatable, and the private source statement library. Private 
core image library support is a system generation option. 


Cor e Image Li br ar y 


Because the core image library contains the executable format of 
programs, it is the library in which you are most likely to keep your 
programs. Otherwise, the programs must continually be placed in the 
core image library before each execution (linkage edited). Therefore, 
during system generation, expand the size cf the cere image library to 
accommodate all the programs desired resident and on-line, both your 
programs and IBM's. 

In addition, try to envision future space requirements, and provide 
this space if possible. Such planning can eliminate the need for 
another system generation. Thus, to expand the cere image library means 
making the remaining libraries smaller on the pack. See Pr ivate 
titr§£ies for alternative considerations. 

Before the size of a library is reduced, delete these items that are 
not to be used, cr those items that were transferred to another library 
in the required format. It is recommended that backup cf the system (a 
copy of the IBM-supplied system) be obtained for your protection in case 
something is accidentally removed and desired frem the system. It is 
also recommended that after successful completion of segments of system 
generation, a copy (backup) of the partially generated system be 
obtained, i.e., upon the creation of a library, or the assembly of a 
supervisor. This permits you tc return to a pcint ether than the 
beginning of the procedure in case of an error. The components supplied 
in the IBM-shipped core image library facilitate system generation. 


COR E IMAGE LI BR ARY PHASES : All pregram phase names in the cere image 
library(s) are composed of two four-character parts. The first four 
characters uniquely identify the pregram. The next four characters 
identify the phase of the program. The first phase cf a pregram to be 
executed from the system core image library (cataloged on SYSRES) or a 
private core image library must be identical tc the name specified in 
the // EXEC control statement. For RPG, the first four characters of 
the phase names are RPGl, although the processor is invoked by 

// EXEC RPG 

All IBM-supplied phase names begin with an alphabetic character 
(A-Z) . Three classes of programs are exceptions: transients, job 
control and linkage routines, and IPL and supervisor program names. 
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Rel oc atable Lib rary 


All IBM-supplied components are shipped in the relocatable library. 
This library is the basis for the creation of a private relocatable 
library. Thus, it is from this library that most IEM ccmpcnents are 
directly or indirectly extracted (indirectly in the case of the 
existence of a private relocatable library and a system relocatable 
library). 


REL OCATABLE LIBRARY C OMPO NENT NAMING CONV ENTIO NS: All DOS relocatable 
modules, including compiler subroutines, are assigned unique 
three-character prefixes. This convention facilitates handling of these 
modules when deleting, displaying, punching, copying, or merging modules 
either individually or by component. figure 1-8 has a list cf prefixes 
for IBM-supplied components. 


COMPO N EN TS SHIPPED WITH T RA NSIEN TS: The following ccmpcnents are 
shipped in the relocatable library with transients. When cataloged to 
the core image library, the transients are automatically cataloged with 
the component phases. 


Component 
OLTEP 
PL/I (D) 

VTOC Display 


Number cf T ransient s 
3 
1 
1 


S ou rce S tatement Library 


All IBM-supplied macro definitions are in this library. This library is 
the basis for the creation of a private source statement library. Thus, 
it is from this library that you may extract, directly or indirectly, 
IBM-supplied component macro definitions (indirectly in the case of the 
existence of both a private source statement library, and a system 
source statement library). 

All macros reside in the A. sublibrary. All sample problems reside 
in the Z. sublibrary. LINKEDIT, DELETECL, DELETERL, and DEIETESL also 
reside in the Z. sublibrary and contain the necessary link-edit and 
control statements, respectively, to linkage edit or delete selected IEM 
components. Also, tne ILFMERG bcok resides in the Z. sublihrary. 

LINKAGE EDITING OR DELETING IBM COM PONEN TS; Among the macro definitions 
in the source statement library are four books that are used when 
generating a new system or altering an existing operational system: 
LINKEDIT, DELETECL, DELETERL, and DELETESL. These becks contain the 
necessary control statements to selectively linkage edit and delete all 
IBM components. 

The linkage edit and delete statements for each IBM component are 
also listed in their respective sections. 


PRI VATE LIBRARIES 

If more than one disk drive is available and the system supports private 
core image libraries, you may reduce the size of the system core image 
library by placing some programs in a private cere image library or 
libraries. You should place phases beginning with a $ in the system 
core image library. You must place phases beginning with $$A, $$B, or 
$$R in the system core image library. When you request a phase, the 
system searches both the system and private core image directories, if 
necessary and applicable: 
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• If the requested phase is a $$A, or $$B phase (transient), the system 
first searches the system cere image directory. If the phase is not 
found, the private core image directory assigned to that partition is 
then searched. If the phase is not found, the system enters the wait 
state with an error message cf X'04E6' in bytes 0 and 1 cf lew main 
storage. A supervisor cataloged to a private core image library can 
never be used, because the IFL retrieval pregram searches the system 
core image directory only. 

• For other phases starting with $, if the phase is net found in the 
system core image library, the private core image library assigned to 
that partition is then searched. 

• If the requested phase does net begin with $, the private core image 
library assigned to the partition is searched first. If it is not 
found, the system core image library is then searched. 

If the system is to support both the batched-job foreground and 
private core image library options, consider which IBM-supplied programs 
you want placed in a private core image library cr libraries. Under 
such a system, the linkage editor executes in any partition. You can 
link-edit most IBM-supplied programs fer execution in a batched-job 
foreground partition (if enough core storage is available in which to 
execute the link-edited program) and place them in a private core image 
library assigned to the partition. 

In a nonbatched-job foreground system (MPS=NO cr YES), private core 
image library support is available for the background partition only. 

If more than one disk drive is available, it is not necessary to 
decrease the size of the relocatable and source statement libraries. 

They can be assigned to other disks and are then referred to as private 
libraries. Systems can be built with private and system libraries 
containing those items that best fit your needs. 


LIB RAR Y S IZES 

Choose the desired libraries, and then plan their precise content and 
size for daily use. Thus, you should know the initial, intermediate, 
and final sizes cf the libraries throughout system generation, and plan 
the exact contents of each library that is created during system 
generation. These contents should be listed, along with their sizes, 
and then the total number of cylinders to be allocated can be 
calculated. 

The contents of the libraries are identified in Atta chment 1 of the 
Memorandu m To User s that accompanies the IBM system that is shipped. 

The storage requirements (sizes) for these components and macro 
definitions are identified in the section for each component. 

An alternate method for determining the number cf cylinders to 
allocate for a library is given in the discussion Alloc at in g L ib r ary 
Sizes . Note that once private library sizes have been allocated, they 
cannot be reallocated. Although excess rocm in the libraries may not 
offer maximum efficiency, in case of a calculation errer, the benefits 
can be easily recognized when sufficient space is available. 
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One 2311 Disk Drive 


When planning an operational system, decide upcn the ultixrate appearance 
of your libraries. It is most convenient to build your operational 
system on the IBM volume that contains the core image and relocatable 
libraries. Single disk drive users may want to build operational 
systems appearing as one of the following: 

• Core image library, small system relocatable library, and/or small 
system source statement library 

The small system relocatable library is for these who need the 
compiler subroutines and/or system IOCS modules on line at all times. 

The small system source statement library can contain system control 
and logical IOCS macros. The system with the source statement library, 
supplied by IBM, can be used as an assembly pack. 


Two or more 2311 Disk Drives, 
a 2314/2319 Direct Access Storage Facility, 
or a 3330 Disk Storage 

Note: You may use the IBM 2319 Disk Storage Facility as the system 

residence device if you so desire. 

For convenience, build your operational pack upon the IBM volume that 
contains the core image and source statement libraries. Multiple disk 
drive users may want to build an operational system appearing as one of 
the following: 

• System core image library, private relocatable library, and private 
source statement library. 

• System core image library, private relocatable library, system source 
statement library, and private source statement library. 

• System core image library, system relocatable library, private 
relocatable library, and private source statement library. 

• System core image library, system relocatable and system source 
statement libraries, and private relocatable and source statement 
libraries. 

• System core image library, system relocatable library and system 
source statement librarary. 

• System core image library, system source statement library, small 
private relocatable library (on the operational pack) and private 
relocatable library. 

• System core image library, private core image library, private source 
statement library, system relocatable library. 

• System core image library, system relocatable library, system source 
statement library, private relocatable library, private cere image 
library. 

IBM system control and system service programs are supplied in the 
system core image libraries of all volumes for all systems. All volumes 
(with the exception of volume 1 for the 2311 system) have the 14K 
Assembler D in the core image library. 

If tbe assembled supervisor dees net exceed the size of the IBM 
supervisor, relinkage editing and recataloging of the IBM-supplied 
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programs shipped in the core image library are unnecessary. Job 
control, linkage editor, MAINT, ESERV, and CSERV are self-relocating and 
need never be relinkage edited. Only the steps required tc retrieve the 
sample problems, delete unwanted components, assign standard labels, 
assemble another supervisor, allocate for and linkage edit IBM 
components, and condense libraries are necessary to perform system 
generation. 

When the number of tracks required for each library has been 
calculated, allocate a sufficient number of c ylinders to each library of 
each operational system. Additional cylinders may be allocated to the 
core image library for application programs. Sometimes you must 
reallocate the libraries on your disk pack(s) during system generation 
to ensure sufficient workfile storage for assemblies and linkage-edit 
steps. For the library reallocation function, see EO S Syst em Contr ol 
and Service , SC24-5036, and DO S Version 4, GC33-5007. 

It is usually advantageous fcr users with mere than one available 
disk drive to define private core image, relocatable, and source 
statement libraries for an operational system during system generation. 


Organization of a DOS System Pack 


The organization of the system pack is as follows: 


Name 

IPL Program, 

System Volume Label 
System Directory 
Librarian Work Area 


Sta rt Location, if Pre sent 
Track 0 of Cylinder 0. 

Track 0 cf Cylinder 0. 

Track 1 cf Cylinder 0. 

Tracks 2, 3, and 4 of Cylinder 0. 

(See Note) 


Transient Directory 

Track 

n 

of 

Cylinder 

0 . 

Open Routine Directory 

Track 

6 

cf 

Cylinder 

0 . 

Library Routine Directory 

Track 

7 

of 

Cylinder 

0 . 

Foreground Program Directory 

Track 

8 

of 

Cylinder 

0 . 

Problem Program Phase 

Track 

9 

cf 

Cylinder 

0 . 

Directory 






Core Image Directory 

Track 

0 

of 

Cylinder 

1, 


Core Image Library 


Relocatable Directory, 
Optional 

Relocatable Library, 
Optional 

Source Statement 
Directory, Optional 

Source Statement Library, 
Optional 


cf cylinder 0 cn a 2314/2319, cr 3330. 

Beginning of the first available track 
fcllcwing the core image directory. 

Track 0 cf the first available cylinder 
following the core image library. 

Beginning of the first available track 
following the relocatable directory. 

Track 0 of the first available cylinder 
fcllcwing the previous library. 

Beginning of the first available track 
fcllcwing the source statement directory. 
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Label Cylinder First full cylinder after the last system 

library. 

Track 

0 
1 
2 

3 

4 

5 

6 - End cf 
cylinder 

Volume Table of Contents Location assigned by the user. 

Met e; The IPL procedure cannct be 
performed if either; 

• the Transient Directory is located on a 
defective track while an alternate 
track has been assigned, or 

• if part of the Supervisor Mucleus in 
the core image library is located on an 
alternate track. 

This is caused by the fact that the 
bootstrap program dees net certain any 
error recovery routines. Restrictions 
that had to be imposed cn the size of this 
program did not allow the inclusion of any 
such routines. 


Allocating Library Sizes 

When the size of an existing library is reduced, it may be important to 
know the minimum size library that can be allocated. Cnee the minimum 
size library is calculated, it should be increased to accommodate any 
problem programs to be included in the library. The size of IBM 
components can be determined by referring to the storage requirements 
given in Figure 1-8 and to appropriate documentation for any program 
products to be included. 

The following explanation illustrates how to calculate the number of 
tracks required for a core image, relocatable, cr source statement 
library. The formula for computing the size of a library is: 


Pro vi d es Stor ag e For 
Background User Labels 

Background Partition Standard (PARSTD) Labels 
Foreground 2 User Labels 

Foreground 2 Partition Standard (PARSTE) Labels 
Foreground 1 User Labels 

Foreground 1 Partition Standard (PARSTD) Labels 
Standard labels 


Library (size in tracks) = LBA/nn 

where: library = either core image, relocatable or source statement 

LBA = the number of LIBRARY BLOCKS ACTIVE for the library cf 

interest and is obtained from a DIRECTORY (SYSTEM or 
PRIVATE) 

nn = LIBRARY LAST AVAILABLE ENTRY in the R (record) column 

Using the sample PRIVATE DIRECTORY that follows, an example of how to 
compute a library size is: 

Relocatable Library = LBA/nn 
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where: LBA = 9849 

nn = 9 , thus 

Relocatable Library = 9849/9 = 1,094.3 tracks 


The relocatable library size ccirputed dees net include the tracks 
allocated for the directory. The directory size must be added to the 
relocatable library size computed. Thus, 


Relocatable Library Allocation = Relocatable Library + Directory 
Allocated Tracks 


Therefore, 


Relocatable Library Allocation = 1,094.3+9 

= 1,103.3 Tracks 


For a 2311, cylinders = Litrary^Size_( Tr acks) 



10 


For a 2314, cylinders 

= Library Size 

(Tracks) 


20 


For a 3330, cylinders 

= Library Size 

(Tracks) 


19 



For this example. 


the Relocatable Library Allocation for a 2311 = 11C 3. 3 T ra cks 

10 

= 110.3 or 111 cylinders, rounded high 


PRIVATE DIRECTORY 


PRIVATE-RELOCATABLE 


02/01/69 -DECIMAL 




C 

H 

R E 

DIRECTORY 

STARTING ADDRESS 

01 

00 

01 

DIRECTORY 

NEXT ENTRY 

01 

05 

01 08 

DIRECTORY 

LAST ENTRY 

01 

08 

09 19 

LIBRARY 

STARTING ADDRESS 

01 

09 

01 

LIERARY 

NEXT AVAILABLE ENTRY 

111 

03 

04 

LIBRARY 

LAST AVAILABLE ENTRY 

127 

09 

09 


DIRECTORY 

ENTRIES ACTIVE 

STATUS INFORMATION 
903 

LIBRARY 

BLOCKS ALLOCATED 

11349 

LIERARY 

BLOCKS ACTIVE 

9849 

LIBRARY 

BLOCKS DELETED 

00 

LIERARY 

BLOCKS AVAILABLE 

1500 

AUTOMATIC 

CONDENSE LIMIT 

00 

LIERARY 

ALLOCATED CYLINDERS 

127 

DIRECTORY 

ALLOCATED TRACKS 

09 
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SYSTEM DIRECTORY AND LIBRARY TRACK CAPACITIES 


Figures 1-9 and 1-10 illustrate the DOS system library directory and track 
capacities. 
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Figure 1-9. LIBRARIES--System library Directory Capacities (Entries per Track) 
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Figure 1-10. LIBRARIES—System library Track Capacities 
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Optimum Assignment of Workfiles 


Figure 1-11 indicates the optimum assignments of the symbolic units used as 
workfiles when assembling and linkage editing cr ccirpiling and linkage 
editing user programs. While SYSRES and SYSLNK must be assigned to disk 
units, SYSnnn can be assigned tc either tape or disk units. Where split 
cylinders are recommended. Figure 1-11 gives the division of the tracks in 
each cylinder between the symbolic units. 


For Figure 1-11, part 1, workfile assignments are as fcllcws: a 
cylinder represents a 2311 disk drive. Thus two cylinders, one over the 
other, represent a 2311 two-disk drive system. 


Within each disk drive, system wcrkfile assignments are represented two 
ways: by horizontal lines and by vertical lines. 


Horizontal lines denote whole cylinder allocations. Vertical lines 
denote split cylinder allocations. In either case, the number of cylinders 
to allocate depends upon the size of the assembly or compilation. 


Whenever split cylinder assignments are recommended, the integer 
notations (0 - 4, etc.) within the disk drive indicate the number of disk 
tracks per cylinder assigned for the specified symbolic unit. Thus, Figure 
1-11, part 1, shows that for a 2311 twc-disk system, disk wcrkfile 
assignments for Assembler (14K) are: 


Disk drive number 1 (SYSRES) 


SYSLNK 

SYS003 


Disk drive number 2 


SYS001, tracks 0 - 4 of the cylinders allocated 
SYS002, tracks 5 - 9 of the cylinders allocated 


Interpreting the information collectively reveals that SYSLNK and SYS003 
are assigned separate cylinder groups on disk 1, and SYS001 and SYS002 
share the same cylinder group cn disk 2. Thus, the cylinder group on disk 
2 is split so that SYS001 and SYS002 each occupy 5 tracks of every cylinder 
in the group. To define the extents fcr workfiles, refer tc the IBW 
publications DOS S ystem C on tr ol a n d S ervice and D0S_Version_4. 


For Figure 1-11, Part 2 of 2: 

• Tape speeds are given by an integer s where: 

s = the relative speed of the tape unit (the number 1 designates the 
fastest tape unit, the number 2 designates the next fastest, etc) 

• Tape channels are given by an integer c where: 

c = the channel that the tape should be cn. 

• Where applicable, the assignments that give the best overall 
performance are indicated. 
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WORKFILE ASSIGNMENTS FOR TWO DISK DRIVE SYSTEMS 


Disk 
Drive 
No. 1 


Disk 
Drive 
No. 2 



SYSRES 


SYSRES 


SYSRES 


SYSRES 


SYSRES 


SYSRES 


SYSRES 


SYSRES 


SYS003 


SYSLNK 


SYS002 SYS003 


SYSLNK 


SYSLNK 


SYS001 


SYSLNK 


SYS002 


SYS004 


SYS003 


8 

1 

1 

> 

*✓> 

>- 

m 

>“ 

in 


WORKFILE ASSIGNMENTS FOR ONE DISK DRIVE SYSTEMS 



SYSRES 


SYS003 


0-9 

SYSLNK 



SYSRES 


SYSLNK 



SYSRES 





Note : Where split cylinders are used, the track numbers shown are for 2311. For 3330, the tracks should be split proportionally. 



SYSRES 


SYSLNK 














Workfile Assignments fcr One Disk Drive with Three Tape Units 


T-T 

I Assembler D 1 i 


t -r 

I PL/I | 

I (D) I 


Symbolic Unit 
Requirements 5 


FORTRAN 


Basic 2 

FORTRAN 


CCBCL 


ANS* 

CCECL 


Tape 4 * 
Speed (s) 


SYS001 


Channel 
Require¬ 
ment (c) 


Tape 4 
Speed (s) 


Net 
Req 'd 


SYS002 


Channel 
Require¬ 
ment (c) 


Tape 4 
Speed (s) 


Not 
Req' d 


Not 
Req * d 


SYS003 


Channel 
Require¬ 
ment (c) 


Tape 

Speed (s) 


Not 
Req'd 


Not 
Req' d 


Net 
Req' d 


Net 
Req' d 


Not 
Req' d 


Not 
Req'd 


SYS004 


(Channel 
|Require¬ 
ment (c) 
x _ 


♦American National Standard 


Note_l: The configuration that yields the best overall performance depends upon the 

storage available. Fcr cases with over approximately 500 lines cf output, 
the twe disk drive configuration yields the best overall performance. For 
cases with under approximately 500 lines of output, the three tape drive 
configuration yields the best overall performance. 

Note_2: Indicates best overall performance. 

Note 3; PL/I (D) users with twe disk drives, compilation times will be faster if 
the following assignments are made fcr SYS001, SYS002 and SYS003 in place 
of these given. 


Assign SYS001 to drive 2, tracks 0-4 of the cylinders allocated 'j 

Assign SYS003 to drive 2, tracks 5-9 of the cylinders allocated > For 2311 

Assign SYS002 to drive 1, tracks 0-9 of the cylinders allocated ) 

The assignments for SYSRES and SYSLNK are the same. 

Note_4: Relative tape speeds are indicated by 1, 2 or 3. 1 designates the fastest 

tape unit, 2 the next fastest, etc. 

Note_5: SYSRES and SYSLNK must always be assigned to disk in a one disk drive, 

three tape drive configuration. 


Figure 1-11. Optimum Workfile Assignments fcr Assembling and Linkage Editing cr 
Compiling and Linkage Editing (Part 2 of 2) 
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Recorder File (SYSREC) 


IJSYSRC is the filename of the recorder file that is used exclusively for 
output from the Recovery Management Support Recorder (RMSR) function. The 
data contained on IJSYSRC is edited and printed by the EREP program. The 
recorder file must be created after the first IPL procedure has been 
performed following supervisor replacement but bef ore t he first JOB card is 
rea d; it is defined by using the file definition statements cf the system. 

The RMSR function makes several types of recordings cn the recorder 
file, in chronclcgical order. The file is made up of records that contain 
information relating to: 

• MCAR 

• CCH 

• Unit Check 

• Counter Overflow 

• Tape Volume Statistics 

• IPL/EOD 

• Miscellaneous Data Recorder 

(2715 error records, 3211 buffer error records, 

3330 non unit-check records) 

The IJSYSRC file is defined as a disk extent for an IBM 2311, 2314/2319, 
or 3330 disk device, and cannot be a split cylinder file. The file should 
not be defined cn an extent which includes a defective or alternate track, 
because data may be lost. The file definition must be included in the 
standard label area. 


Creating and using the Recorder File 


A minimum of ten tracks is required fcr the recorder file (SYSREC). The 
following file definition statements create the recorder file: 

// OPTION STDLAEEL 

// DLBL IJSYSRC, 'DOS RECORDER FILE' Note: The cards must be 

// EXTENT SYSREC,,,,nnnnn,nnnnn included in the 

ASSGN SYSREC,X'cuu' standard label deck. 

SET RF=CREATE 


// JOB FIRST 


The recorder file is created when the first job statement (// JOB FIRST) is 
read. 

These file definition statements must immediately follow the IPL 
procedure and precede the first job. Vie recommend that the file definition 
be permanently retained on the standard label track cf the label cylinder 
Thus, once the file is created, recording can proceed at the beginning of 
each day without operator intervention; that is, at IPL time the recorder 
file is opened and updating continues. When the system is to be shut down 
at the end of the day, issue the Record On Demand (ROD) command to record 
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the statistical data and to ensure that no statistical data is lost. With 
RDE support, an EOD (End of Day) record is alsc written. 

Not e; The ROD command is not valid for recording teleprocessing 

statistical data. Refer to DO S BTAM , GC30-5001, and £TAM Mes sage 
Control P rogram , GC30-5004, for teleprocessing procedures. 


System Generation and Maintenance Procedures 

Many techniques exist for generating and maintaining operational volumes. 
Each installation uses techniques dependent on its machine configuration 
and its selection of system and application programs. The techniques 
described here correspond to the following principal machine configurations 
relevant to system generation and maintenance: 

1. At least two 2311 disk drives. 

2. One 2311 disk drive. 

3. One 2314/2319 direct access storage facility. 

4. One 3330 disk storage. 

The four examples given do net show the coding necessary to linkage edit 
and delete all IBM-supplied components. They are meant only to be examples 
and must be tailored to meet your needs. Additional control statements 
required for linkage editing and deleting any IBM-supplied components are 
given in their respective sections. 


Disk Operating System Distributions 

Figures 1-12 through 1-14 illustrate the various distributions of the IBM 
Disk Operating System. The procedures within this section (S yst em 
Generation and Maintenance Procedur es) will guide you through your system 
generation. 

Not e: The DLBL and EXTENT information for the 2311, 2314/2319, and 3330 

distributions is found in Section 4 of the Memor and u m to U ser s of 
the IB M Di s k Operating Sys t em . 


ALL IBM 2 31 1 USER S 

The IBM 2311 Disk Operating system is supplied on three volumes; 

• Volume 1 contains a core image library and a system relocatable library. 

• Volume 2 contains a core image library and a system source statement 
library. 

• Volume 3, is optional depending on the components you ordered, contains 
a core image library, a private source statement library, and a private 
relocatable library. 


Volume 3 User s 

This SYSRES file (Volume 3) contains a core image library with the 
following: 
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• System Control and Service Programs (370N-CL-453) 

• Assembler D 14K Disk and Tape Workfile (370N-AS-465) 

This core image library is required only by single disk-drive users. 
Multiple disk-drive users may viish tc use the MERGE function of the CORGZ 
program to access the private libraries on Volume 3. Use either the core 
image library of Volume 3 or one of another SYSRES tc access the SYSSLB and 
SYSRLB files of Volume 3. 


I BM 2311 Disk -O nly Users 


IBM 2311 disk-only users receive the volumes on 1316 disk packs. Volume 3 
is optional and may not be required for your particular installation. 

These volumes are ready for system generation, but it is recommended that 
they be copied and retained for backup. 


IBM 2311 Disk and 9-Track Tape Us ers 


The 9-track tape reel for the 2311 system contains either Volumes 1 and 2 
or all three Volumes. Volumes 1 and 2 are necessary fcr system generation. 
Volume 3 may not be necessary for your particular installation. See All 
IBM 231 1 Tape users. Retain this tape for backup. 


IBM 2311 Disk and 7 -Track Tap e User s 


The 2311 system for 7-track tape is supplied on cne or twc reels of 
magnetic tape. The first reel contains Volumes 1 and 2 and is shipped tc 
all users. The second reel of tape contains Volume 3 and is shipped only 
if one of the components in either of the private libraries has been 
ordered. Retain these tapes fcr backup. 


All IBM 2311 a nd Tape Users 


Restore one or both of the Volume 3 private libraries (files) based on the 
components you desire. See either Sec ti on Four cf the Mem orandum tc User s 
of IBM D isk Op era ting Syste m or Attachment On e cf the P rogram Materi a l list 
for I BM D isk Op er a ting System . Section four and attachment cne are 
identical in content and identify the various components of these libraries 
(files). See R es t oring the I B M-S upplied Syst e m Tape to Di sk for the 
procedure to restore the tapes tc disk. 


ALL IBM 2314 USER S 

The IBM 2314 Disk Operating System is supplied cn cne SYSRES file. This 
file contains the core image library, relocatable library, and the source 
statement library. 


IBM 2 31 4- Qnly_ (and 2319- Qnl y) U sers 


IBM 2314-only users receive the 2314 system on one 2316 disk pack. This 
pack is ready for your system generation procedure, but it is recommended 
that this pack be copied and retained for backup. 
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IBM 231 4 and 9 -Tr ack Tap e Use rs 


The 2314 system is shipped on cne reel of magnetic tape. This tape 
contains the entire SYSRES file for the 2316 disk pack. See Res tori ng the 
IBM-Supplied S ystem Tape to Disk for the procedure to restore this tape. 
After the tape has been restored, retain it for backup. 


IBM 2 3 14 and 7-Tr ac k Tape Use rs 


The 2314 system is shipped on two reels of magnetic tape. The first reel 
of tape contains the first half cf the SYSRES file; the second reel 
contains the second half of the SYSRES file. Both 7-track tape reels are 
required to restore the entire 2314 system tc a single 2316 disk pack. See 
Restori ng the I BM -S upplie d S y s tem Tape t o Disk for the procedure to restore 
these tapes. Retain these tapes for backup after they have been restored 
to disk. 


IBM 3330 AMD 9-TRACK TAPE USERS 


The 333C system is shipped on cne reel of magnetic tape. This tape 
contains the entire SYSRES file for the 3336 disk pack. See Restorin g th e 
IBM-Supplied Sy stem Tape to Disk for the procedure to restore this tape. 
After the tape has been restored, retain it fcr backup. 


IBM 333 0 A ND 7-TRACK TA PE U SERS 

The first 3330 system is shipped on two reels of magnetic tape. The first 
reel of tape contains the first half cf the SYSRES file; the second reel 
contains the second half of the SYSRES file. Both 7-track tape reels are 
required to restore the entire 3330 system tc a single 3336 disk pack. See 
Resto r ing the IE M -Supplie d System T ap e to Dis k for the procedure to restore 
these tapes. Retain the tapes after they have been restored to disk. 


General System Generation Procedures 

Each system generation job begins with a new IPL procedure, including the 

necessary ADD, SET, and ASSGN statements. Typically, each jcb consists of 

many job steps, including such librarian programs as: 

• CSERV (core image library service) to punch out (or write on magnetic 
tape or disk) programs from the cere image library. 

• SSERV (source statement library service) to punch out (or write on 
magnetic tape or disk) macro definitions. 

• RSERV (relocatable library service) to punch cut (cr write on magnetic 
tape or disk) the relocatable modules used to build IBM-supplied 
processor programs. 

• DSERV (directory service) to display on SYSLST the current contents of 
one or more library directories and their remaining library capacities. 
The directory display may be either an alphabetically sorted listing cr 
a listing of the entries in the order they appear in the directory. 

• MAINT (library maintenance) tc delete and/or catalog library elements, 
and also to condense and reallocate library extents. 

• CCRGZ (copy or merge) to selectively copy cr merge library entries from 
one disk pack tc another disk pack. CORGZ allows larger cr smaller 
allocations for each library cf the new pack. 
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Key: 

Cl - Core Image Library 

Initialize Disk Program 

PRL - Private Relocatable Library 

PSL - Private Source Statement Library 

Restore - Restore Tape to Disk Program 

RL - System Relocatable Library 

SL - System Source Statement Library 

TM - Tape Mark 

Vol. - Volume 


Figure 1-12. PROCEDURES--2311 Disk Operating System Distributions 
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Figure 1-13. PROCEDURES--2314/2319 Disk Operating System Distributions 
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Key: 


Cl - Core Image Library 

Initialize Disk Program 

Restore - Restore Tape to Disk Program 

RL- System Relocatable Library 

SL - System Source Statement Library 

TM- Tape Mark 
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3330 System, 9-Track Tape Distribution 
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3330 System, 7-Track Tape Distribution 


Restore - Restore Tape to Disk Program 
TM - Tape Mark 


Figure 1-14. PROCEDURES--3330 Disk Operating System Distribution 


Module 1: Planning and Procedures 89 











The sequence cf job steps depends cn the configuration available and the 
operational packs being built. Certain activities are common: 

1. The general system generation procedure is: 

a. Initialize the disk pack to contain the system. 

b. For disk and tape, restore the IBM-supplied tape onto disk. For 
two disk drives and no tape drives, copy the IBM-supplied disk to 
another disk to obtain backup. 

c. Perform the IPL procedure from the restored disk and create the 
recorder file. 

d. Retrieve sample problems. 

e. Create private libraries, if desired. 

f. Delete unwanted programs from the system (all libraries). 

g. Allocate library sizes required. 

h. Set standard labels for SYSLNK, SYS001, SYS002, and SYS003 if 
desired. 

i. Assemble supervisor into cards. 

j. Linkage edit and catalog supervisor and IEM components. (A 
supervisor cataloged to a private core image library can never be 
used because the IPL retrieval program searches cnly the system 
core image directory for phases beginning with $$.) 

k. Assemble IOCS modules. 

l. Catalog IOCS modules tc the relocatable library. 

m. Delete supervisor and ICCS macros if not desired. 

N ote : The operator needs to know the address of label CNLSVE in order 
to obtain a "special purpose dump". As he normally dees not have 
access to the supervisor assembly listing, you should locate the 
address in this listing and ask him to write it down under the heading 
"special Purpose Dump" (Reference 10) in DCS Versi on 4 Message s, 
GC33-5009. 

2. The supervisor generation macro instructions must be keypunched to 
form a single source deck. 

3. DELETR cards are selected cr prepared for each relocatable library 
component that is not needed in the system. 

On a system with at least two disk drives, you can copy selectively 
rather than delete (DELETR). To copy selectively, prepare the 
librarian cards in the form: COPYR IJx.ALL. 

4. DELETS A.xxxxxxxx cards are selected cr prepared for each macro 
definition that is not needed in the system. IBM-supplied macro 
definitions appear in each component section. They appear in the 
general Ind ex under "macros, IEM-supplied" with pointers tc the 
correct module number(s). Certain low-usage macro definitions, such 
as supervisor generation macros, may be retained cn a system 
maintenance pack, rather than on the operational pack(s). The bocks, 
Z.CELETECL, Z.DELETERL, Z.DELETESL and Z.LINKEDIT, can be retrieved 
through SSERV. These books contain the necessary statements to delete 
or linkage edit selectively any components from the system. A pause 
card is read immediately before a deletion cr linkage-edit job is 
performed. This allows you to enter END to perform the job or to type 
in CANCEL at the console printer keyboard tc bypass that deletion or 
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linkage edit. To avoid going through the complete hook performing 
selective jobs, choose only these cards needed from the book. 

5. After a component is linkage edited into the core image library, the 
relocatable library space used to build the component can be freed by 
deleting the modules and condensing the library. The delete book 
Z.DELETERL can be used to perform this step. However, the relocatable 
library of the pack prior to updating a component must be rebuilt, by 
entering the appropriate modules either from cards, magnetic tape, or 
disk. On a system without magnetic tape this tradeoff must be 
carefully considered: disk tracks made available vs. speed and 
simplicity cf component maintenance. 

6. To use some compilers a certain collection cf IOCS mcdules must be 
available in the relocatable library of each cperaticnal pack. These 
modules are preassembled and supplied in the relocatable library for 
the compilers that use them. Certain cf these IOCS mcdules are 
linkage edited into each compiler object program. These modules are 
generated using the following macro definitions supplied by IBM: 


CDMOD 

PRMQD 

MTMOD 

SDMODxx 


ISMOD 

DAMOD 

DIMOD 


Card Reader/Punch 
Printer 
Magnetic Tape 

Sequential DASD. SDMCD consists cf ten similar macro 
definitions: SDMODFI for sequential disk with fixed 

input, SDMODFC for sequential disk with fixed output, etc. 
A complete description of SDMODxx is contained in DOS 
S upervisor and I /O Macros, GC24-5 C37, and D CS V e rsion 4, 
GC33-5007. ~.~ . 

Index Sequential CASE 

Direct Access Method, DASD 

Device Independent Module 


With assembler language you can assemble these IOCS functions 
directly into their application programs, or the IOCS modules can be 
assembled separately and cataloged into the relocatable library. 
Separate assembly of IOCS modules requires no additional main storage 
or additional execution overhead in speed. These mcdules, shipped 
preassembled for IBM components, can also be used by any other 
program, if applicable. A separate assembly is preferable because: 

• Program assembly and reassembly time is minimized. 

• IBM supplied IOCS modules used by compilers may also be used by 
your application programs. Use of these mcdules reduces the 
assembly time of your application programs. 

• Use of preassembled IOCS mcdules facilitates program maintenance 
and standardization. 

• The xxMOC macro definitions just cited require a substantial numcer 
of cylinders in the source statement library. 

The corresponding generated modules ordinarily require fewer 
cylinders in the relocatable library. Thus, ycu may prefer to retain 
xxMOD macro definitions only on the system backup volume, cataloging a 
selection of generated modules ente each cperaticnal volume. 

7. During each system generation and maintenance procedure, system 

libraries are periodically copied on magnetic-tape reels, disks, or 
cards to provide backup in case of subsequent specification errors cr 
machine errors. These backup procedures may be omitted, but the 
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indicated maintenance procedures and any additional precautionary 
procedures desired should he followed. 


The following IBM Basic Programming Support Utility Programs m ay be 
reguired for system generation and should he ordered with the initial 
distribution volume, depending cn the configuration cf the system. 

Each EPS utility must be loaded from cards by a separate IPL 
procedure. 


• Distribution Program 

• Initialize Disk 

• Restore Tape-to-Disk 

• Universal Character Set 


360P-UI-208 
360P-UT-2 06 
360P-UT-061 
360P-UT-048 


Note: These utilities support neither the 3400 series magnetic tape 

units, nor the 3330 Disk Storage. 

8. Perform a DSERV, or check a system directory printout to determine the 
contents and sizes of the system libraries during system generation. 
This procedure enables you to determine that enough blocks remain for 
linkage edit and catalog procedures. A DSERV requires the following 
control statements: 


// JOB DSERV 
// EXEC DSERV 
DSPLYS ALL 

/* 

/& 


A printout of the system directory is provided automatically 
following a linkage edit with an CPTICN CATAL specified or any // EXEC 
MAINT. 

9. The initial system volume from IBM contains the volume serial number 

111111. 

If the IEM-supplied volume is a tape, initialize the disk pack with 
the volume serial number before restoring the tape tc the disk. The 
standard labels (DLBL and EXTENT statements) shown for the examples 
are adequate for system generation. However, the EXTENT statement 
must be adjusted to reflect your volume serial number. 

To use the standard labels for configurations with two disks, 
SYSLNK, SYS001, SYS002, and SYS003 can be assigned to the second disk. 
The standard labels shown in the following discussions assume the VTCC 
to be on Cylinder 199 of the residence volume (for 2311 and 2314/2319) 
or cylinder 403 (for a 3330). Following system generation, adequate 
standard label assignments should be set tc support the installation's 
requirements. 

10. Standard labels (OPTION STELABEL) are defined cn the system 

distributed by IBM for SYSLNK, SYS001, SYS002, SYS003, and SYSREC. 

A reply of delete to the following message destroys the system 
residence file unless it is encountered during a MAINT reallocation 
run: 

DOS.SYSTEM.RESIDENCE.FILE 
4444A OVERLAP ON UNEXPIRED FILE 

The core image library allocations on the IBM-supplied volume(s) 
are not sufficient to contain all of the system components. The 
adequacy of allocations can be determined through the use of Figure 
1 - 8 . 
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Refer to the section fcr each component fcr core image phase names, 
relocatable module names, and source statement macro names. Phases, 
modules, and macros are identified by component. Also included in the 
section for each component are these statements required for linkage 
editing and deleting. 

11. If the installation-tailored superviscr dees net e xceed the SEND 

address of the IBM-supplied supe rvis or, the link ag e editor, librarian, 
and asse m bler do not need to be linkage edit e d and cataloged again to 
the core image library . 


Maintenance Procedures 


The maintenance of disk operating system libraries can be performed with 
the MERGE function of the CORGZ librarian program. The MERGE function 
allows complete libraries or selective library entries to be merged into 
existing libraries. When the MERGE function is used, space availability is 
always a consideration. The following discussions apply tc the core image, 
relocatable, and source statement libraries. 


REPLACING I DENTICAL ENTRIES USIN G MERGE FUN CTION 


When transferring entries that have identical names as 
a library, the old entry (phase, module, or bock name) 
library's directory, and the new entry is added to the 
directory. The phase, module, or beck is added tc the 


existing entries of 
is deleted from the 
end of the library's 
end cf the library. 


ADDING UN IQUE EN TR IES USING MERGE FUNCTI ON 

When uniquely named entries (phase, module, or beck name) are transferred 
to an existing library, the names of the entries are added to the end of 
the library's directory, and the phase, module cr beck itself is added to 
the end of the library. 


General Library Updating Techniqu e s u s ing t he Me r ge Fu n ction of the CORGZ 
L ibrarian Progr am 


The techniques presented here apply tc the examples given. They are 
intended as a guide and do not necessarily satisfy all requirements. The 
method that you apply to maintain the libraries depends upen the library 
structure, and special requirements concerning the maintenance of your 
library. 


COPYING SELECTIVE L Y TO MERGE L IBRARIES 

When there are more desired entries in an existing library, it is faster tc 
selectively copy (MERGE) to the library containing the most number of 
desired entries. Thus, the number cf entries transferred and directory 
searches are kept to a minimum to save time. If there is insufficient 
space in a library to accommodate additional entries, unwanted entries can 
be deleted, the library condensed, and the new entries then added to the 
library. 


DELETING UNWANT ED ENTRIES A ND MERG ING AN ENTIRE LIERARY WI TH ANOTHER 
LIBRARY 

A second technique is to apply the IBM-supplied EELETERL cr DELETESL book 
to delete all unwanted entries from a library and copy the entire library 
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to another library, thus merging the two libraries. Using this technique 
requires that the library being copied to contains enough space to 
accommodate the entire library being copied. If there is insufficient 
space, the library being copied to can be condensed or reallocated. 


COP YI NG S E LEC T IVE LY, MERG ING TWO LIBRARIE S TO CREAT E A THIRD LIBRARY 

If there is insufficient space to accommodate a merge of two libraries, a 
third library can be created tc contain selected entries from the two 
libraries being merged. This technique eliminates the need for condensing 
or reallocating an existing library. Note that this technique can be 
applied by using only two disk drives. 


DEIET I NG UN WANTED ENTRIES F ROM TWO LIBRARIES AND MERG ING BCTH LIBRARIES TC 
CREATE A THIR D LIBRARY .. 

Another technique for merging two libraries is to delete unwanted entries 
from the two existing libraries, and merging the twc libraries, in their 
entirety, by copying them to create a third library. Note that this 
technique can be applied by using only two disk drives. 


Copying the IPL Record 


You may transfer the IPL record $$A$IPI2 between SYSRES and SYS002 (RES and 
NRS) in either direction. To dc this, use the COPYI or COPY ALL statement 
under the MERGE function of the CORGZ program. COPYI copies only $$A$IPL2. 
COPY ALL copies $$A$IPL2 and the system core image, relocatable, and source 
statement libraries. 


CONVENTIONS FOR MERGE E XA MPLES 

The following conventions are used in the maintenance examples given here. 
If a macro definition called m is an entry in a library called L (L being 
any library and m being any macrc definition entry in any library I) then 
any macro definition entry m in any library L can be designated as Lm. 

Assume that there are two libraries L called A and B, and that the macrc 
definition entries 1, 2, and 3 in library A are IBM-supplied, and 8 and 9 
are user-defined macro definitions. Further, assume that you receive a new 
release of DOS with a source statement library, called library B, 
containing IBM-supplied macro definitions 1, 2, 3, 4, and 5. Thus, library 
A and library B can be represented as follows: 


Library A— 

Al, 

A2, 

A3, 

A8, 

A9 

Library B— 

El, 

E2, 

B3, 

B4, 

E5 


For the libraries defined, macrc-definition entries 1, 2, and 3 in library 
B are identical in name to 1, 2 and 3 in library A, but a later version cr 
update. Macro definitions 4 and 5 in library B are new IBM-supplied macro 
definitions for the release received, and macrc definitions 8 and 9 in 
library A are user-defined. The structures of the libraries defined here 
are used in the examples that fcllcw. 


Maintenance Examples using Me rqe Func t io n 


For each example that follows: 
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• The rracro definitions updated are selected arbitrarily, 

• Library A is assumed to reside on disk drive A, and library B on disk 
drive B, 

• Library A is assumed to be your existing library, and library B the 
IBM-supplied maintenance update (new release), 

• The techniques described: 

a. can be applied by using only two disk drives. 

b. applies tc the maintenance of all libraries (core image, 
relocatable, and source statement). 

The following examples illustrate several ways to update an existing 
library. 


EXAMP LE 1A: Copying Selectively tc Merge Two Libraries 

If the majority of the macro definitions desired are in library A, and it 
is desired to update macro definitions A2 and A3, selectively copy (merge) 
macro definitions B2 and B3 from IBM-supplied library B tc library A. When 
there are many mere macro definitions in one library than the other, it is 
faster to selectively copy to the library with the greatest number of 
entries, provided there is enough space in the receiving library. If there 
is not enough space in library A, the unwanted macrc definitions A2 and A3 
must first be deleted from library A, and library A condensed before the 
transfer can be attempted. 

A representation of the results of selectively copying macro definitions 
B2 and E3 from library B to library A follows: 

Library A— Al, , , A8, A9, E2, B3 

Library B— Bl, B2, B3, B4, E5 

Note that the macro definitions B2 and B3 are added to the end of the 
library updated (library A). 

EXAMPLE IB: Variation of Selective Copying to Merge Two Libraries 

A variation of the technique described in Example 1A demonstrates the 
capability of transferring in any direction. Thus, if the majority of 
macro definitions are in library B, and it is desired tc update macro 
definitions Al, A2, and A3, selectively copy macro definitions A8 and A9 
from library A to library B. 

A representation of selectively copying macro definitions A8 and A9 from 
library A to library B follows: 


Library A— 

Al, 

A2, 

A3 , 

A8, 

A9 

Library B— 

Bl, 

B2, 

B3, 

B4, 

E5 


Note that macro definitions A8 and A9 are added to the end of the Horary 
updated (library B). 

EXA MP LE 2A: Deleting Unwanted Entries from A Library and MERGING Libraries 
by Copying One tc the Other 

Assuming that the majority of macro definitions are in library A, an 
alternate method of accomplishing an update similar tc that described in 
Example 1A follows. 

Delete macro definitions Bl, B4, and B5 from library B, and completely 
copy library B tc library A. Thus, the IBM-supplied EELETESL book can 
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delete all unwanted macro definitions from the source statement library, 
and the library transferred in its entirety. 

A representation of the results of deleting macro definitions Bl, B4, 
and B5 from library B, and copying library B follows: 

Library A— Al, , , A8, A9, B2, B3 

Library B— , E2, B3, , 

Note that library B is added to the end of library A, and that library A in 
Example 1A is identical to library A in this example. 

EXAMPLE 2 B: Variation of Deleting Unwanted Entries frcm A Library and 
Copying (MERGING) One to the Other 

A variation of the technique described in Example 2A that demonstrates the 
capability of transferring in any direction follows. 

Thus, to add macro definitions A8 and A9 tc library B, delete macro 
definitions Al, A2, and A3 in library A and then completely copy library A 
to library B. Again, the IBM-supplied DELETESL book can delete all 
unwanted IBM-supplied macro definitions frcm the scurce statement library. 

A representation of the results of deleting macro definitions Al, A2, 
and A3 from library A and copying library A tc library B fellows. 

Library A— _, _, _, A8, A9 

Library B-- El, B2, B3, B4, E5, A8, A9 

Note that user macro definitions A8 and A9 are added tc the end of the 
library being updated (library E), and library E in Example IB is identical 
to library B in this example. 

EXAMPLE 3 : Copying Selectively, Merging Two Libraries tc Create a Third 
Library 

If space is a problem, a third library called C can be created to be a 
combination of selected macro definitions from both library A and library 
B. Thus, if the desired macro definitions in library A are A8 and A9 (the 

user's macro definitions), and El, E2, and B3 in library B (IBM-supplied), 

then user macro definitions A8 and A9 can be selectively copied (merged) 
from library A to library C, and IEM-supplied macrc definitions Bl, B2, and 
B3 can be selectively copied (merged) from library E to library C. The 
advantage of this technique is that the need fer a condense or reallocation 
of an existing library is eliminated, and time is saved. However, the time 
required to initialize a third disk pack must be taken intc consideration. 

A representation of the results of selectively copying library A and 
library B (merging) to create library C follows: 


Library 

A— Al, 

A2, 

A3, 

A8, 

A9 

Library 

B— El, 

E2, 

B3, 

B4, 

E5 

Library 

C— El, 

B2, 

B3 , 

A8 , 

A9 


Note that library C requires less available space than if either library A 
or library B were merged with each other. 

EXAMPLE 4 : Deleting Unwanted Entries from Two Libraries and MERGING Both 
Libraries to Create a Third Library 

A variation of selectively copying from twe libraries tc ferm a third 
library follows. 

To retain user macro definitions A8 and A9 in library A, and update 
IBM-supplied macro definitions Al, A2, and A3 in library A, delete Al, A2, 
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and A3 from library A, and B4 and B5 from library E. Then completely copy 
(merge) library A and library E to create a third library C. 


A representation of the results of deleting unwanted macro definitions 
from library A and library B, and copying (merging) both libraries to 
create a third library C follows: 


Library A— , , , A8 f A9 


Library B— El, B2, B3, 


Library C— El, E2, B3, A8, A9 


Note that library C requires less available space than if either library A 
or B were merged with each other. Also note that library C in Example 3 is 
identical to library C in this example. 


CONSIDERATIONS FOR MERGING 


The DLBL and EXTENT file definition statements must precede the MERGE 
control statement. The file name, logical unit, and direction of transfer 
for the following operations are indicated in Figure 1-15. 


1. In merging to or from a system residence file (NRS), the modified or 
duplicate file name must be IJSYSRS, the logical unit must be SYS002, 
and the file ID (identification) must be identical to the ID supplied 
when the file was created. 


2. In merging to a private relocatable library file, the file name must 
be IJSYSRL, the logical unit must be SYSRLE, and the file ID must be 
identical to the ID supplied when the file was created. 


3. In copying from a private relocatable library file, the file name must 
be IJSYSPR, the logical unit must be SYS001, and the file ID must be 
identical to the ID supplied when the file was created. 


4. In merging to a private source statement library file, the file name 
must be IJSYSSL, the logical unit must be SYSSLB, and the file ID must 
be identical to the ID supplied when the file was created. 


5. In copying from a private source statement library file, the file name 
must be IJSYSPS, the logical unit must be SYSOOO, and the file ID must 
be identical to the ID supplied when the file was created. 


6. When you merge to a private core image library file,, the file name 

must be IJSYSCL, the logical unit must be SYSCLB, and the file ID must 
be identical to the ID supplied when the file was created. 


7. When you merge from a private core image library file, the file name 
must be IJSYSPC, the logical unit must be SYS003, and the file ID must 
be identical to the ID supplied when the file was created. 
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Figure 1-15. PROCEDURES—Merge Operation File Naire and Logical Unit Identification 


Diagnostic messages for erroneous assignments, file definitions, etc., are 
provided on SYSLST. 


The following is an example of a jot set up for the MERGE function. The 
sections of the job are bracketed and numbered 1 through 15. The 
explanations that fellow the jet are keyed to the job sections. The 
example assumes two disk drives with addresses cf 190 and 191 that: 

1. the MERGE function of the CORGZ librarian program is on SYSRES which 
is on 190 by virtue of an IPL 

2. SYSRLB and SYSSLB are assigned to 191, SYS000 and SYS001 to 190, and 
SYS002 to 191. 

3. Following this, SYS002 and SYSCLB are assigned to 191 and SYS003 to 
190. 


// JOB EXAMPLE 
// ASSGN SYSRLB,X’191* 
// ASSGN SYSSLB,X'191 ' 
// ASSGN SYS003,X'191 * 
// ASSGN SYS000,X'190' 
// ASSGN SYS001,X'190' 
// ASSGN SYS002,X'191' 


r— 

Note 1 // DLEL IJSYSRL,'PRIVATE RL',99/365 

| // EXTENT SYSRLB,111111,1,0,1500,100 

t_ 


r — 

Note 2 

I 

L- 


// DLBL IJSYSSL,'PRIVATE SI',99/365 
// EXTENT SYSSLB,111111,1,0,1600,100 


r — 

Note 3 // DLBL IJSYSPC,'PRIVATE CIL',99/365 

| // EXTENT SYS003,111111,1,0,1700,100 

L_ 


Note 4 

I 

L_ 


// DLEL IJSYSPR,'PRIVATE RL TEST',99/365 
// EXTENT SYS001,111111,1,0,1300,100 
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r __ 

Note 5 // DLEL IJSYSPS,'PRIVATE SL TEST',99/365 

| // EXTENT SYS000,111111,1,0,1400,100 

L_ 


r— 

Note 6 // DLBL IJSYSRS,'SYSTEM RESIDENCE',99/365 

| // EXTENT SYS002,111111,1,0,1,170 

L_ 


// EXEC CORGZ 

r — NEWVCL RL=10(2),SL=10(2) ,CL=10 (15) 

Note 7 COPYR ALL 

L— COPYS ALL 

COPYC ALL 

r — MERGE PRV,PRV 

Note 8 COPYR ALL 

L— COPYS ALL 

r — MERGE NRS,PRV 

Note 9 COPYR ALL 

L— COPYS ALL 

/* 

// ASSGN SYS003,X'190' 

// ASSGN SYS002,X'191' 


r— 

Note 10 // DLBL IJSYSCL,'PRIVATE CIL',72/365 

L— // EXTENT SYSCLB,111111,1,0,1700,100 


r— 

Note 11 ASSGN SYSCLB,X'191' 

L_ 


r— 

Note 12 // DLBL IJSYSPC,'PRIVATE CL TEST',72/365 

1 // EXTENT SYS003,111111,1,0,1500,100 

L_ 


r— 

Note 13 // DLBL IJSYSRS,'SYSTEM RESIDENCE',72/365 

>-— // EXTENT SYS002, 111111,1, 0, 1,170 

// EXEC CORGZ 


r— 

Note 14 MERGE PRV,PRV 

| COPYC ALL 

l_ 


r— 

Note 15 MERGE NRS,PRV 

| COPYC ALL 

L_ 

/* 

/& 
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The following explanations are keyed to the sections cf the job: 


Note 

Note 

Note 

Note 

Note 

Note 

Note 

Note 

Note 

Note 

Note 

Note 

Note 

Note 


1. File definition statements for a private relocatable library file 
which is created and updated. 

2. File definition statements for a private source statement library 
file which is created and updated. 

3. File definition statements fcr a private cere image library file 
which will be created. 

4. File definition statements fcr a private relccatable library file 
from which modules are copied. 

5. File definition statements for a private source statement library 
file from which books are copied. 

6. File definition statements for a modified, or duplicate system 
residence file from which modules and becks are copied. Note that 
this file could be the old SYSRES (with user programs). 

7. Creates private core image, relocatable, and source statement 
libraries on SYS003, SYSRIE, and SYSSLE ard copies the relccatable 
and source statement libraries from the system residence file on 
SYSRES into them. 

8. Merges all modules and books from private relocatable and source 
statement libraries on SYS001 and SYS000 intc the appropriate 
private libraries created on SYSRLB and SYSSLE. 

9. Merges all modules and books from the relocatable and source 
statement libraries of a modified, or duplicate system residence 
file on SYS002 into private libraries created on SYSRLB and 
SYSSLB . 

10. File definition statements for a private core image library file 
just created and to be updated. 

11. To merge to the private cere image library just created, assign it 
to SYSCLB. You must assign the 'from' file to SYS003, and the 
file is a previously created private cere image library. See the 
note under C ons i dera t ions fo r Mer gin g. 

12. File definition statements for a private core image library from 
which phases are copied. 

13. File definition statements for a modified or duplicate system 
residence file from which the phases cf the cere image library are 
copied. 

14. Merge all phases from the private core image library on SYS003 
into the newly created private core image library on SYSCLB. 


Note 15. Merges all phases from the core image library of a modified, or 

duplicate, system residence file cn SYS002 intc the newly created 
private core image library on SYSCLB. 

For a more detailed description cf the MERGE function see D OS Sys t em 
Control and S er vi ce, GC24-5036. 
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DOS System/370 Distribution Program 
and BPS Job Control Coding Specifications 


Figure 1-16 provides job control infcriraticn that is tc be inserted in the 
pregrain decks described in the sections P roc es sing the Dis tribu t ion T a pe 
and C reating a Back-up of you r Ge nerat ed Syst e m Volum e (2311 and 2314/2319 
systems only). 


r - n 

|// DATE = yyddd j 

I I 

I yy = 00-99 decimal (years) | 

| ddd = 01-366 decimal (days) j 

h- 1 


// ASSGN SYSxxx,x'cuu',dd[,X'ss'3 

xxx = logical unit 

cuu = channel and unit of device 

• The channels used by the EPS supervisors are: 

Multiplexer (channel 0) 

Selector 1 
Selector 2 

Selector 3 and 4 (DCS distribution pregrair only) 

dd = one of the following device type cedes: 

Cl-3210/3215 Console Printer-Keyboard 

Dl-2311 Disk Drive 
D3-2314/2319 Disk Drive 
D4-3330 Disk Storage 

Ll-1403 or 3211 Printer 
L2-1443 Printer 

Rl-2540 Card Read-Punch (reading only), or 3505 Card Reader 
R2-2540 Using Punch-Read-Feed feature 
R3-1442 Card Read-Punch 
R4-2501 Card Reader 
R5-2520 Card Read-Punch 

Tl-2400, 3410, or 3420 7-track Tape 
T2-2400, or 3420 9-track Tape 

ss = 90 for 7-track tape unit 


| CO 1600 EPI | 

I C8 800 BPI | 

Y --I 

|// VTOC STRTADR=(cccchhh),EXTENT=(yy) | 

j cccchhh = cylinder and head number of starting address | 

| yy = number of tracks allotted to VTOC in decimal (1-20) j 

I*- i 

|V0L1 nnnnnn nnnnnn = Volume Serial Number j 

L_J 


Figure 1-16. PRCCEDURES--Distrikution Program and EPS Job Control Coding Specifications 
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Processing the Distribution Tape 


The IBM-supplied system residence tape irust be copied cntc a disk pack 
before system generation can be performed. The pack that is to contain the 
system must be initialized with a vcluire label and a volume table of 
contents (VTOC) at cylinder 199 (2311, 2314/2319), or cylinder 403 (if a 
3330 Disk Storage is used). 


Initializing the Disk 

To initialize the disk: 

• Mount the distribution tape. 

• Set write protection switch to R/W (3330 only). 

• Place the following control cards in the card reader, in the sequence 
shown: 

// JOB INTDSK 
// DATE yyddd 

// ASSGN SYSGPT,X'cuu',dd (disk) see Note 1. 

// ASSGN SYSOOn,X'cuu',dd (disk) see N ote 2. 

// ASSGN SYSLOG,X* cuu *,dd 
// EXEC 

// DID nn see N ote 3 . 

// VTOC STRTADR=(cccchhh),EXTENT=(yy) see N ote 4 . 

VOLlnnnnnn see Note 5 . 

// END 

Note 1: SYSOPT is required to specify the disk device to be initialized. 

Note 2: n = 2,3,4, or 5. SYS002 through SYS005 are optional to specify 
additional disk devices tc be initialized. 

Note 3 : Refer to the DOS Versicn 4 publication fcr a complete description 
of the UID control card. 

For 2311 and 2314/2319, nn=: 

IR Previously flagged tracks are tc retain their flags without 
surface analysis, or 

IA Denotes surface analysis cn all tracks. Generation of borne 
address (HA) and R0 records, preformatting of IPL records, 
writing of volume label and VTOC, or 

IS For packs that have already been initialized this entry can be 
used to change the volume label(s) and the VTCC location. 

For 3330 Disk Storage, nn=: 

IQ Quick initialization. No surface analysis. Nc home address 
generation, only standard R0 generation. IPI records are 
preformatted, volume labels and VTCC are written, or 


IS 

See above. 



Note 4: For 

2311: 

cccchhh=0199C00 

yy=l-10 

For 

2314/2319: 

ditto 

o 

CM 

1 

<H 

II 

>1 

>1 

For 

3330: 

cccchhh=0403000 

yy=l-19 
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For each output disk specified (max. 5) a set of 


// VTOC STRTADR=(cccchhh),EXTENT=(yy> 
VCLlnnnnnn 


cards are to be added. 


Note 5: nnnnnn = Volume serial number 

Columns 42-51 are reserved for user's identification. A label 
control set consisting of a VTOC control card and a V0I1 
ccntrcl card is required for each pack assigned. The label 
control sets apply to the assignments in the order as 
specified in the jcb stream and net in strict numerical 
seguence. 


• Dial on the console the address of the tape unit containing the 
distribution tape into the CFU lead address switches. 


• Press LOAD. 

• When the Wait light comes on, press START and EOF on the card reader. 

• If message 4444A appears in SYSLOG, type in 4 blank, and press INTERRUPT 
to delete unexpired files, one by one. Type in 2 blank tc delete all 
unexpired files at once. 

• The message *END OF INTDSK* appears on SYSLOG when initialization is 
complete and the CPU enters the wait state. The DOS system can then oe 
copied on the disk. 


Byp as sing the I nitialize Disk P rocedure 


If the disk has previously been properly initialized, the Initialize Disk 

procedure can be omitted and the following procedure performed to bypass 

the initialize disk routine: 

• Mount and ready the distribution tape. 

• Place the following control cards in the card reader in the sequence 
shown: 

// JOB INTDSK 
// DATE yyddd 
// ASSGN SYSLOG,X'cuu',dd 
// FILES SYSIPT,1 

• Dial the address of the tape drive containing the distribution tape in 
the CPU load address switches. 

• Press LOAD. 

• When the Wait light comes on, ready the card reader containing the 
control cards by pressing START and EOF. 

• The tape forward-spaces past the initialization program and the 
following message appears on SYSLOG: 

OOOC 

4000A 
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Restoring the IBM-supplied System Tape to Disk 


The DOS Distribution program that is part of the IEM-supplied system tape 
is a modified version of the restore program available with 360P-UT-208. 

The latter program, however, does not support the 3330 Disk Storage. 
Moreover, the DOS distribution Program can use alternate disk and tape 
drives, if necessary. The IBM-supplied system tape may contain files for 
more than one volume. You are informed on which device the file is to be 
restored and are given the option tc restore or bypass each file. 

Following initialization or bypassing initialization of the disk pack, 
the IBM-supplied system tape can be restored tc disk by this procedure: 

• Do not rewind the distribution tape. 

• Clear the card reader. 

• Set write protection switch to R/w (3330 only). 

• Place the following control cards in the card reader: 

Note to all 2311 users with 7-track tape : The assignment of SYS001 is not 
required for Volume 3. 

// JOB DISRST 
// DATE yyddd 

// ASSGN SYS000,X'cuu',dd (required output disk) 

// ASSGN SYS001,X'cuu',dd (alternate output disk, if used) 

// ASSGN SYS002,X'cuu', dd, X' ss ' (alternate input tape, if used) 

// ASSGN SYSLST,X'cuu',dd 
// ASSGN SYSLOG,X*cuu',dd 
// EXEC 

• Press LOAD on the console (IPL from the distribution tape). 

• When the Wait light comes on, ready the card reader by pressing START 
and EOF. 

• If message 4444A appears on SYSLOG, type in 4 blank, and press INTERRUPT 
to delete unexpired files, one by one. Type in 2 blank tc delete all 
unexpired files at once. 

The following three-part message is issued when each cf the files of the 
IBM-supplied tape(s) is to be restored next on the assigned logical unit. 

file name 

SYS000 

THIS FILE FOR SYS001 
4307A 

Either restore the file by typing in 2 blank and pressing INTERRUPT, or 
bypass the file by typing in 4 blank and pressing INTERRUPT. 

The following message is issued whenever output is switched to another 
volume. This message gives the logical unit assignment on which the next 
file is to be restored. 

SYS000 

SWITCHING TO SYS001 
430 8A 

Note to all multiple 2311 users requiring Volume 3 : Volume 3 is restored 
to SYS000. 

Be sure that an initialized pack is mounted on the designated drive. 

Type in 2 blank and press INTERRUPT tc restore the volume. Type in 
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0 blank or 1 blank and press INTERRUPT to terminate the job. For a 
single-drive user, SYS000 and SYS001 refer to the same drive. 


• If the message END OF VOLUME CN SYSIPT 3777A occurs while restoring a 
multivolume file, ready the next reel on SYSIPT reply 2 blank and press 
INTERRUPT to continue. This iressage will net be encountered if the 
second volume of a two-volume system distribution is mounted on an 
alternate drive assigned to SYS002. 

// ASSGN SYS002,X'cuu',dd t,X * ss'] (tape) 

• When the job is finished, the following message is printed on SYSLOG and 
the disk pack is ready for system generation: 

DOS SYSTEM RESIDENCE FILE 

nnnnnn RECORDS RESTORED FOR ABOVE FILE 

3007 

END OF JOB 

3008 


Creating a Back-up of your generated System Volume 


At the end of system generation, you should copy the system volume for 
operational volume backup. To restore the files to a disk pack, the IBM 
BPS copy and restore or the distribution program utility pregrams should be 
used. Familiarity with the BPS utility publications as listed in the 
Preface of this publication is necessary. BPS Messages , appearing later in 
this module, lists the BPS messages. 


CREATING A BACK-UP TAPE OF 2311 AND 2314/2319 SYSTEMS 


The BPS program 360P-UT-208 can copy a 2311 or 2314 system pack to tape for 
backup. (For a more detailed information see IBM System/360 BPS 
Distribution Program Specifications and O perating Guide , C21-5001.) The 
resulting tape is a self-loading tape that is similar to the IBM-supplied 
system tape. The tape produced by this pregram has the following format: 

• IPL 

• Initialize disk program 

• Tapemark 

• IPL 

• Restore program 

• File identification record 

• File label information 

• Disk file (DOS system) 

• Tapemark 

To copy a system pack to tape, using the copy function of 360P-UT-208: 

• Mount the system pack and a tape. 

• The following job control cards must be placed in the program deck 
between the cards containing ID numbers C208 and D208 in columns 73-76: 
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// JOB DISCPY 

// DATE yyddd 

// ASSGN SYSLOG,X'cuu' f dd 

// ASSGN SYSLST,X* CUU',dd 

// ASSGN SYSC00,X'cuu',dd (disk) 

// ASSGN SYS001,X' cuu',dd[,X * ss *] (tape) 
// EXEC 


• Place the deck in the card reader. 


• The following utility modifier card irust he placed immediately fcllcwing 
the program deck: 

column 8 column 53 

I ♦ 

// UDS 'field one of format 1 EASD file label 44-characters' 


• Dial on the console the address of the card reader. 

• Check the units and settings; then press the System-Reset key. 

• When the Wait light comes on, press START and ECF cn the card reader. 

• Press the ccnsole load key. 


Restoring the Back-up Tape to Disk, using the Restcre Euncticn cf 
36 0 P-UT-208 


See the section entitled: Restor in g the IBM- s uppl ied System Tap e tc Disk . 
The procedure described there can alsc be used tc restcre the back-up tape 
of your generated system to disk. Please note, however, that 360P-UT-208 
does not support multivolume disks. After bypassing initialization the 
back-up tape can be restored to a disk pack (which should have been 
initialized previously). 


CREATING A BACK-UP TAPE OF A 3330 SYSTEM 


A 3330 system pack cannot be copied to a tape using a EPS utility (for 
instance, 360P-UT-208), because EPS does not support the 3330 Disk Storage. 

A back-up can be obtained under DOS using the Ccpy and Restore Disk 
function of 370N-UT-491 (see the DCS_Version_4 manual listed in the Preface 
of this manual). 

The user can copy his system tc tape in two ways: 

• Co Py volume (complete system pack) 

• Copy file 

The first method is the simpler cf the two: all files cn the system pack, 
plus any other data, are copied to tape(s). The second methcd needs 
specific file information for every file to be copied; moreover, only one 
file can be copied per tape volume. Generally speaking, the second methcd 
requires more tape volumes than the first. 
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Co pyi ng a Systeir Di sk t o T ap e 


1. Before the copy disk function can ce performed, ircdule IJWCDT must fce 
link-edited and cataloged into the core image library, if this has net 
teen done yet. Put the following cards in the card reader, in the 
sequence shewn: 

// JOB LINKEEIT COPY DISK UTILITY 
// OPTION CATAL 
INCLUDE IJWCDT 
// LBLTYP NSD(IO) 

// EXEC LNKEDT 
/£ 

2. To copy your generated systeir: 

• Mount the system pack. 

• Mount the back-up tape on a tape drive and ready the device. 

• Place the following cards in the card reader, in the sequence shown: 

// JOB COPY DISK VOLUME TO BACK-UP TAPE 

// ASSGN SYS004,X'cuu' DISK INPUT (VOLUME TO EE COPIED) (Notel) 

// ASSGN SYS005,X *CUU' TAPE OUTPUT (BACK-UP TAPE) 

// ASSGN SYS003,UA 
// UPSI 00100 
// EXEC CDKTP 

// UCR TV,A=(1504),E=(3330) (Notes 2 and 3) 

/& 

Note 1 : cuu denotes the channel and unit address. 

Note 2: The parameter A= in the UCR card specifies the most common 
physical record length of the area tc be copied tc obtain the best 
performance. (1504 is the maximum length of a record in the core image 
library.) 

Note 3: The entry E= in the UCR card specifies the device type of the disk 
storage device. 

When the first tape volume is full, the following rressage will be printed: 

BG 4140A NO ALTERN DRIVE ASSGN UOUT SYS005=CUU 

The tape is rewound and unloaded by the system. As soon as a new tape 
volume is mounted and the drive is readied, reply as fellows to continue 
the job: 

newtap 

Replacing a full tape volume by another tape may have tc be dene more than 
once. Not before the whole disk volume has been copied, will the system 
terminate the jot with the message: 

BG EGJ COPY 

provided the job name was indeed CCFY. 


Res to ring the Back-up Tape to Dis k 


If your DOS system ever becomes defective, ycu must restore your back-up 
tape to a disk volume. In order to do this, first of all reload a disk 
pack with the IBM-supplied system tape so as tc obtain a system under 
control of which the restore procedure can be executed. 
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Next, the following steps are to be performed: 

1. Using the reloaded PID system, module IJWRTD must be link-edited and 
cataloged into the core image library. Use the following job control 
cards: 

// JOB LINKEDIT RESTORE DISK UTILITY 
// OPTION CATAL 
INCLUDE IJWRTD 
// LBLTYP NSD(IO) 

// EXEC LNKECT 
/£ 

2. To restore your generated system: 

• Mount the back-up tape on a tape drive and ready the device. 

• Mount a disk pack (re-initialized if necessary) and ready the disk 
drive. 

• Place the following job control cards in the card reader, ready the 
reader, and start executing the jcb: 

// JOB RESTORE BACK-UP TAPE TO DISK 

// ASSGN SYS0G4,X* cuu' BACK-UP TAPE (Note 1) 

// ASSGN SYSC05,X'cuu' OUTPUT DISK 

// ASSGN SYS003,UA 
// UPSI 10000 

// DLBL UCUT,'(filename cf the system residence file)',99/365 (Note 2) 
// EXTENT SYS005 , ,1,0, nnnnn,iriririrrr (Notes 3 and 4) 

// EXEC RTPDK 
/£ 

Not e 1: cuu denotes the channel and unit address. 

N ote 2: (filename of the system residence file) can be any name fcr 
this new system, for instance DCS.SYSRES.FILE. This name will be kept 
temporarily in the FI label cf the VTOC and will eventually be 
overwritten by the original filename of the copied system pack. 

N ote 3: nnnnn=00001 denotes the relative track address of the lower 

limit of the SYSRES file which normally starts at cylinder 0, track 1. 

Note 4: mmmmm denotes the number cf tracks occupied by the new file 
(Note 2). This number is not significant here, because all the back-up 
tapes will be restored regardless cf this limit. When your copied 
system has been successfully restored, the original extent limits cf 
the copied system are written in the system's Fl label in the VTCC. 

If more than one back-up tape is involved, the following message will 
be displayed after end-of-reel is detected: 

BG 8001D IS IT EOF 

Reply by typing in n (for 'no'). The tape will be rewound and unleaded 
after which the second back-up tape volume can be mounted. Meanwhile 
the system will print the following message: 

BG 4140A NO ALTERN DRIVE ASSGN UIN SYS004=cuu 

After the tape drive with the newly mounted reel has been readied, 
reply by typing in: 

newtap 

The above procedure must be repeated fcr each tape volume to be 
restored. After the last tape has been restored, reply y (fcr 'yes') 
to the message 
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BG 8001D 


IS IT EOF 


upon which the system displays the final message 
EOJ RESTORE 


provided the jcbname was indeed RESTORE. 

3. As a last step, it is advisable to run a LVTOC job to check whether all 
files have teen restored, and tc keep track cf the extents of the 
files. Before running this job, module IJWLTVB must be link-edited and 
cataloged into the core image library. Use the following job cards in 
the sequence shown: 


// JOB LINKEDIT LISTVTOC UTILITY 
// OPTION CATAL 
INCLUDE IJWLTVB 
// LBLTYP NSD(IO) 

// EXEC LNKEDT 
/& 

// JOB LIST VTOC 

// ASSGN SYSOO 4,X' CUU ' SYSTEM DISK 

// ASSGN SYS005,X'cuu' PRINTER 

// EXEC LVTOC 
/& 


Disk Operating System Sample Problems 


The sample problems provided with the Bisk Operating System (DOS) 
demonstrate to the user, particularly the cperatcr, each component cf the 
programming system. Although the problems are general and illustrative 
rather than detailed and exhaustive, they nevertheless serve as a minimal 
test of each user's programming system. The user's programming system is 
built from the more general system supplied py IBM. 

The sample problems are designed tc be run cn a minimum system 
configuration including at least one 2311 disk drive (the system residence 
volume), a card reader/punch, printer, and a 3210/3215 Ccnscle 
printer-keyboard. The minimum background partition storage capacity 
required for each sample problem is given in Figure 1-8 and in the module 
for each component. 

No data is required for any cf the sample problems, except RPG, and PL/I 
(D). The requirements for each problem are described in the examples that 
follow. 

All sample problems, except those for multiprogramming, are included in 
the IBM-supplied core image and source statement library volume. The 
multiprogramming sample problem is prepared by the user. These sample 
problems included in the source statement library volume are retrieved as 
card decks by the SSERV librarian program. Each card deck is either a 
source program cr a set of control cards. Individual decks are preceded by 
a CATALS card and a BKEND card and followed by a EKEND card. Once the 
sample problems have been retrieved, they can be deleted from the user's 
operational system disk during system generation. 


Retrieving the Sample Problems 

The sample problems are retrieved from the second volume (core image and 
source statement library volume) during system generation. Although the 
order for retrieving the problems from the disk is optional, it is 
recommended that they be retrieved in the erder cf intended execution. 
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This facilitates the task of preparing the jcb streair. The following jot 
step is necessary to selectively retrieve all of the sample problems: 

// JOB SAMPLPRE 
// EXEC SSERV 

DSPCH Z.F01,Z.CEl,Z.RGl,Z.PLl,Z.ASl 
DSPCH Z.SMI,Z.UTTPPRl,Z.AS2,Z.SM2 
DSPCH Z.UTDKPR1,Z.AS3,Z.UTDCPRl 
DSPCH Z-AS4,Z.SM4 / Z.UTTPPR2 
DSPCH Z.ASS,Z.SM5,Z.UTDKPR2 

DSPCH Z.AS6,Z.SM6,Z.UTDKPR3,Z.CE2,Z.DLCP12 

DSPCH Z.MCR1,Z.MCR2 

DSPCH Z.ORDC,Z.ORJT,Z.IIFSAMFL 

/6 

If you do not wish to retrieve a particular prcbleir frcir the source 
statement library volume, delete the appropriate operand from the preceding 
DSPCH statement. All of the sample problems are in the Z sublibrary and 
all of that sublibrary can be retrieved with the DSPCH Z.ALL statement. 

Card columns 73-80 in each sample problem deck (except RFG) contain an 
identification number and a sequence number. The identification number for 
the RPG sample problem deck is punched in columns 75-78. Card columns 1-5 
contain the sequence number for RPG. Although these numbers can identify 
individual sample problems, it is recommended that the cards be 
machine-interpreted. These decks are punched in the crder in which they 
are retrieved from the source statement library volume (preferably the 
intended order of program execution). To prepare each sample problem for 
execution, the user must: 

• Remove all CATALS and BKEND cards. If the RPG cr PI/I (D) sample 
problem is retrieved, remove the *END SOURCE DECK/EEGIN INPUT CARDS card 
from the programs. 

• Punch and insert the necessary jcb control cards fcr each program to te 
run, as shown in the examples. 

The programs are compiled or assembled, linkage edited, and executed 
with a minimum cf operator intervention. 

Notes: All six assembler sample programs will run under either Assembler D 

or Assembler F. 

Do not attempt to run any sample problems fcr ccmpcnents or devices 
you do ne t have. Each sample problem is further discussed in the 
section covering the IBM-supplied program for the sample problem 
intended. 

The sample problems can be run as separate jobs; but, when possible, 
they should be run as successive jcb steps within an operating system 
environment. A PAUSE card placed at the end of each sample problem to be 
run in successive job steps allows the operator to make any necessary 
changes in device assignments. The order for running the sample problems 
is not completely arbitrary. The assembler, sort/merge, and utility 
programs should be run consecutively; the cutput cf cne pregram becomes the 
input to the nex-t program. The compiler and IOCS sample problems can 
either precede or follow the other programs. The multiprogramming example 
should be run last when the programs are run as successive job steps. 


Physical and Logical I/O Assignments 


It is assumed that the user has made assignments fcr these logical I/O 
functions: 
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SYSLOG SYSPCH SYSREC SYS003 

SYSRDR SYSLST SYS001 SYS004 

SYSIPT SYSLNK SYS002 

The preceding assignments are for the background problem program area 
only- The assignments necessary for the multiprogramming sample problem 
are included in the input test data for that problem. 

Unique disk extents should be assigned initially tc SYSLKK, SYS001, 
SYS002, and SYS003. The extents defined during system generation should he 
valid for sample problem execution. 

If standard assignments are missing, the necessary ASSGN cards should be 
inserted at the beginning of the jot stream. After each job step of a 
sample problem, certain additional logical I/O assignments cr reassignments 
may be required. Examples of such reassignments are shown in Figures 1-17 
and 1-18. When reassignments are necessary, the user must furnish: 

• The channel and unit number (X'cuu') for each tape cr disk extent. 

• The proper disk pack serial number and data cell volume number in all 
DLEL and EXTENT cards. 


Tape, Disk, and Data Cell Configurations 


In addition to the minimum system configuration, three tape drives are 
required to run the Tape Sort/Merge sample problem, and five tape drives 
are required to run the Tape and Disk Sort/Merge sample problem (2400 
application). A 2314/2319 direct access storage facility is required tc 
run the Tape and Disk Sort/Merge sample problem (2314 application). For 
installations with 7-track drives, convert feature OFF and translate ON 
(X* E8' as third operand of ASSGN) must be specified. Where 9-track tape 
drives are used, the third operand (X'B8') can be emitted. The logical I/C 
assignments for tape are shown in Figure 1-17, and those for disk and data 
cell are shown in Figure 1-18. 

In addition to checking the proper function cf each sample problem, the 
programs also test job control and linkage editor functions. They are 
helpful in verifying the correct generation cf the user's operational 
system. The main purposes of the sample problems, however, are 
demonstration and instruction. 

A listing of the source program and job control cards is written on 
SYSLST for each problem. If LOG is keyed into SYSLOG at the beginning of 
the job, a listing of all job control cards and eperater messages is 
written on SYSLOG. Detailed setup procedures, including job control cards, 
are given for each sample problem. 

The SYSLOG output for the 1401/1440/1460 Emulator Programs can be found 
in the Emulator Program manual listed in the Prefa ce. 
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Sample Problem 

Disk Extent 
No. 1 

Tape Drive 
No. ll 

Tape Drive 
No. 2 1 

Tape Drive 
No. 3 1 

Tape Drive 
No. 4 

Tape Drive 
No. 5 

Tape Sort/Merge Execute 

SYSRES 

SYS004 

1 

SYS002 2 






H 

SYS005 3 



Tape and Disk Sort/Merge 

SYSRES 

SYS001 

SYS002 

SYS003 

SYS004 

SYS005 

(2400 Application) 







Tape-to - Printer Utility Execute 

SYSRES 


SYS004 





1 . Tape drive number refers to X'cuu' operand in ASSGN card. 

2. If a 7-track tape drive is used, the third operand (X'B8') is required to turn byte convert off. 

3. For Tape Sort/Merge, SYS001 and SYS003 must be assigned to the same tape drive, as must SYS002 and SYSQ05. 


Figure 1-17. SAMPLE PROBLEMS—Tape Logical I/C Assignments 


Sample Problem 

Disk Extent No. 1 

Disk Extent No. 2 

Disk Extent No . 3 

Disk Extent No . 4 

Disk Extent No. 5 

FORTRA.N or Basic FORTRAN: 

Compile 

Link Edit 

Execute 

SYSLNK 

SYSLNK 

SYS001 

SYS001 

SYS002* 













COBOL, American National Standard 
COBOL, RPG, Assembler: 






Compi le 

Link Edit 

Execute 

SYSLNK 

SYSLNK 

SYS001 

SYS001 

SYS002 

SYS003 

SYS004 




SYS001 

SYS002 

SYS003 



COBOL LCP 

Execute 



Disk Sort/Merge Execute 

SYS002 

SYS004 





Tape and Disk Sort/Merge 
(23) 1 Application) 

SYS001 

SYS002 

SYS003 





Tape and Disk Sort/Merge 
(2314 Appl ication ) 

SYS001 

SYS002 

SYS003 



Disk - to - Printer Utility Execute 

SYS004 

SYS005 





Data Cel 1 - to - Printer Uti 1 ity Execute 

SYS004 






1287, 1288, 1419 : 






Assemble 

Link Edit 

Execute 

SYSLNK 

SYSLNK 

SYS001 

SYS001 

SYS002 

SYS003 











* FORTRAN IV only 


Figure 1-18. SAMPLE PROBLEMS—Eisk/Data Cell Logical I/C Assignments 
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The SYSLST output reproduces much of the SYSLCG output. In addition, 
SYSLST displays the source programs, storage naps, scrt/irerge and utility 
program control cards, problem results, and other information. If SYSLST 
is a 1403 printer equipped with the Universal Character Set (DCS) feature, 
see UCS command in the DOS Ope ra ti ng Gu ide, GC24-5022. If this 
specification is not made, the issuance of a control command by job control 
causes a command reject, resulting in jcb cancellation. 


System Generation Examples 


Two IBM 2311 Disk Drives Example 

Figure 1-19 illustrates the general procedure to be followed by users with 
two or more 2311 disk drives available. 
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DOS system 
received on 
tape(s). 


User's disks 
initialized . 


DOS system 
received on 

disks 0316). 


Copy IBM - 
shipped packs 
for backup . 


Restore tape(s) 
to disks. 




^ IPl Vo 

1 ume 2 


^ IPL Vo 

ume 1 

DSERV 


DSPLYS the 
directories 

[ _ 

s' 



Tailor the 
Relocatable 
Library . 




^ Are \ 
omponents 
n Volume 3 
desired 


Assemble 
Supervisor . 


DSPLYS 
PSL & PR L 


XD°\ 
desired x. 
components have 
S>s \subroutines 


CQPYR Subroutines 
with the MERGE 
function of the 
CORGZ program . 


Are 

assemblies 
. desired. . 


Assemble desired 
components. 


UNKEDIT the 
assembled object 
modules to the 
Core Image Library. 


./fcomponenfx^ x 

in Pvt .Rel .to be \ NO 
in Core Image / 
x^Library yr 


UNKEDIT desired 
components from 
Pvt. Rel. Lib. to 
the Core Image 
Library. 


DSPLYS the direc¬ 
tories and display 
label cylinder. 


Tailor the 
Source 
Statement 
Library. 


y' Are\ 
components^S. 

^o reside in Relo-/ 111 
eatable 
xLibrary/^ 


s Private x^ 
Core Image 
Lfbrary(s) 

S. needed./ 


DSPLY 

A.DOSCHLV 


CQPYR Component 
with the MERGE 
function of the 
CORGZ program. 


Create Private 
Core Image 
Library(s). 


' DSPCH Z .ALL 
Linkedit & delete 
books, component 
MAI NT book, and 
sample problems. 


LINKEDIT the new 
supervisor and, if 
necessary, Sys. 
Ctrl. & Serv . 

Pgms. to the Core 
Image Library. 


YAreV 
om po n en r&Sy 
'fo reside in Sour 

\ Statement > 
sbibrary-- ,/ ^ 


Linkage edit 

desired 

components 


l Create job stream 
\ for the remaining I 
\ SYSGEN proce- / 
\ dure by using / 
\cards produced / 

\ by DSPCH . / 


IPL newly 
created SYSRES. 


COPYS Component 
with the MERGE 
function of the 
CORGZ program. 


COPY new 
operational 
pack(s) for 
backup. 


Linkage edit and 
assemble desired 
components. 
Display label 
cylinder. 


End of system 
generation . 


Figure 1-19. PRCCEDURES--Cverview cf Multiple Disk Systerr Generation 
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The following is only an example of one of the man^ possible methods for 
generating a system. Figure 1-20 illustrates the system configuration upon 
which the Example Two IBM 2311 Disk Drive is based. 


Note: If you intend to follow this example for your system generation, 

then tailor it to meet the requirements of your installation. 


inp ut /out put de vic e c onfi gura tio n for EXAMPLE ONE (FIGURE 1-2 0) 


Device 

Channel 

Unit 

Use 

3505 

0 

OC 

Card Reader (SYSRDR, SYSIPT) 

3525P 

0 

0D 

Card Punch (SYSPCH) 

3211 

0 

0E 

Printer (SYSLST) 

3210/3215 

0 

IF 

Console Printer-Keyboard (SYSLOG) 

2311 

1 

91 

Disk (SYSLNK, SYS001, SYS002, SYS003, 
SYS004, SYSRLB, SYSSLB, SYSCLB, SYSREC) 

2311 

1 

90 

Disk (SYSRES) 

3420T7 

1 

80 

Magnetic tape with the data conversion 
feature (switchable to channel 2) 

3420T9 

1 

81 

Magnetic tape (switchable tc channel 2) 

EXAMPLE ONE 

: RESULTS OF 

SYSTEM 

GENERATION 


When system generation is completed for example one, the operational disk 
of the installation contains: user selected components and programs in its 
system core image library together with the installation's tailored 
supervisor, job control, linkage editor, and librarian programs. The 
tape(s) shipped by IBM are retained as a backup tape. They are 
self-loading tape(s) capable of being restored cntc disk. 

The sample problems are punched out during step 4. 

The private relocatable and source statement libraries contain all 
modules and macro definitions shipped from IBM (except these deleted). 

The system core image library of the operational pack is built to 
contain those IEM programs chosen. 

The private core image library is created fer the user whe needs 
additional core image library space and for the user who desires to 
link-edit non-relocatable IBM-supplied and user pregrams fer execution in a 
batched-joh foreground partition, as well as the background partition. 

The private libraries are condensed, and the IOCS modules are assembled 
and cataloged to the private relocatable library. 

When system generation is completed, the sample problems should be run 
against the operational pack tc ensure correct creation of all system 
programs. 


Module 1: Planning and Procedures 115 






3420 

7-track 
with Data 
Conversion Feature 


Unit X'180'/X'280' 


Unit X'190' 


Unit X'191' 

SYSCLB 
SYSRLB 
SYSSLB 
SYSLNK 
SYS001 
SYS 002 
SYS 003 
SYSREC 


Figure 1-20. PROCEDURES—System Configuration for the Two IEM 2311 Disk 
Drive Example 

The following steps are keyed to the two IBM 2311 disk drive example. 


Channel 2 


3210/3215 
SYS LOG 


IBM System/370, Mode! 135 

Optional Features 

Floating Point 
Channel Switching 


Channel 0 


Channel 

T 


3505 


Q 


2311 


SYSRES 


2311 


Unit X'OIF' 

Unit X'OOE' 

Unit X'OOC' 



Unit X'OOD’ 


3525P 


SYSLST 


SYSRDR 

SYSIPT 


SYSPCH 




DISK-ON LY U SERS 

Disk-only users receive the 2311 system on 1316 disk packs. Another 
initialized disk pack (VTOC on cylinder 199) is required for private 
libraries and workfiles. 

• Mount the IBM-supplied core image library, source statement library 
pack, and the workfile pack and proceed to Step 3. 


TAP E U SER S 

Disk users with at least one tape unit available receive the 2311 system on 
one or two reels of magnetic tape. This IBM-supplied tape is capable cf 
restoring the 2311 system on two 1316 disk packs. Another initialized disk 
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pack (VTOC on cylinder 199) is required for private libraries and 
workfiles. 

® Mount the IBM-supplied tape and two disk packs and proceed as follows: 


Step 1 

Before restoring the tape, take the necessary action to perform or bypass 
the initialize disk routine. 

a. If the disk packs have not been initialized, the IBM-supplied volume, a 
self-loading tape, is capable cf initializing the packs. See 
Processing the Distribution Tap e fcr the proper use cf control cards. 

If initialization is required, irount the packs cn units 190 and 191 
and mount the IEM-supplied tape on unit 281 (9-track tape unit). Place 
the following cards in the card reader. Dial unit 281 in the lead unit 
switches and press LOAD. When the system enters the wait state, press 
START and EOF on the card reader. Mount the third and fourth packs cn 
units 190 and 191 after the previously mounted packs have been 
initialized, rewind the tape, and repeat the process. The multipart 
forms of the linkage editor maps and the supervisor listing are 
required by your IBM customer engineer and ycur system programmers fcr 
maintenance purposes. 


r- 1 

|// JOB INT'DSK | 
|// DATE 72182 | 
j// ASSGN SYSLOG,X'OIF',Cl | 
|// ASSGN SYSOPT,X*190',Dl | 
|// ASSGN SYS002,X'191',D1 | 
|// EXEC j 
|// UID IA | 
|// VTOC STRTADR=(0199000),EXTENT=(10)j 
j VOL1111111 | 
|// VTOC STRTADR=(0199000),EXTENT=(10)| 
j VOLlllllll | 
j// END | 
L_J 


b. If the disk packs were previously initialized, the initialize disk 

routine can be bypassed . Any volume serial number used in the EXTENT 
cards for the following steps must agree with the volume serial number 
used when the packs were initialized. 

To bypass the initialize disk program cn the IBM-supplied tape, 
mount the IBM-supplied tape on unit 281 (9-track drive), mount the 
initialized disk on unit 190 (VTOC on cylinder, 199), mount the work 
pack on unit 191 and insert the following ccntrcl cards in the reader. 
Dial unit 281 in the load unit switches and press LOAD . When the 
system enters wait state, press START and ECF cn the card reader. The 
job is complete when the OOC and 4000A messages are logged. 

r-1 

|// JOB INT'DSK | 

j// DATE 72182 | 

|// ASSGN SYSIPT,X'281',T2| 

|// ASSGN SYSLOG,X'01F',Cl| 

|// FILES SYSIPT,1 | 

L_J 
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Step 2 


After step 1 is completed, you must restore the systems from the 
self-loading tape to the initialized packs. This step is omitted when a 
system is received on disk. 

Do not rewind unit 281. To load the tape onto disk, place the following 
cards in the reader, dial unit 281 in the load switches, and press ICAD. 
When the system enters the wait state, press START and EOF on the card 
reader. See Restoring the. IBM-Supplied System Tape-tc-Disk for operating 
procedures. 

Note: Volume 3 is restored to SYS000. 

r - 

|// JOB DISRST | 

j// DATE 72182 | 

|// ASSGN SYSLOG,X'OIF',Cl| 

|// ASSGN SYSLST,X'00E',LI| 

|// ASSGN SYS000,X'190',D1| 

|// ASSGN SYSOOljX'191* , Dl| 

|// EXEC j 

L_J 

Step 3 

Dial the address (unit 191) of Volume 2 (the core image and source 
statement system residence disk drive) into the lead unit switches, and IPL 
(press LOAD) to pass control to the DOS supervisor. See I PL Control and 
ASSGN St at ements f or Sys t em G en eratio n, later in this module, for the IPL 
control statements. When the system enters the wait state, press START on 
the card reader. The following cards are in the card reader 
(SYSRDR/SYSIPT): 


r- n 

| ADD X'OOC* ,3505 | 
| ADD X'COD', 352 5P | 
| ADD X'00E' ,3211 | 

| ADD X*01F , ,1050A | 
| ADD X' 190*,2311 | 
| ADD X'191',2311 | 
| SET DATE=06/30/72 | 
| ASSGN SYSLOG,X *OlF' | 
| LCG | 

| ASSGN SYSRDR,X *OOC' | 
jASSGN SYSIPT,X'OOC' | 
|ASSGN SYSPCH,X *OOD * | 
jASSGN SYSLST,X'00E' | 

| ASSGN SYSREC,X'191 * | 
| SET RF-CREATE | 
L_J 


Step 4 

Perform a sorted DSERV to display the directories. Then SSERV (display and 
punch) all the desired sample problems from the source statement library 
into cards. Punched output includes the sample problems with BKEND and 
CATALS cards. Four other books in the source statement library that should 
be punched out at this time (Z.LINKEDIT, Z.DELETECL, Z.DELETER!, and 
Z.DELETESL) contain the necessary control statements tc selectively linkage 
edit and delete all IBM components. It is advisable to use these four 
books to assist you with the creation of the remaining system generation 
job stream. The sample problem program names, and the linkage edit and the 
delete book names can be chosen and punched into the DSPCH statement(s). 
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After these sample problems and books have been punched, they can be 
deleted from the source statement library, along with unwanted macros 
(e.g., those macros never to be used). 

r-i 

|// JOB DSERVSLB | 

]// EXEC DSERV | 

I DSPLYS ALL j 

|/* I 

|// EXEC SSERV j 

| DSPLY A.COSCHLV (Display the change level.) | 

| DSPCH Z.ALL (Display and punch sample prcblems, delete, and link edit j 

| books.) | 

|/* | 

j// PAUSE REMOVE CARES FROM SYSPCH. PRESS END TO CONTINUE j 

I /6 I 

L_ J 


Step 5 

Dial the address (unit 190) of Volume 1 (the core image and relocatable 
system residence disk drive) intc the load unit switches, and IPL (press 
LOAD) to pass control to the DOS supervisor. See IPL Control and ASSGN 
Statemen ts for S ystem Gen er atio n, later in this module, fcr the IPL control 
statements. When the system enters the wait state, press START on the card 
reader. The following cards are in the card reader (SYSRDR/SYSIPT): 


r - 

| ADD X'00C* ,3505 | 

| ADD X'COD', 3525P | 

| ADD X'00E',3211 | 

| ADD X'GIF',1050A | 

| ADD X'190’,2311 | 

| ADD X'191',2311 | 

j SET DATE=06/3 0/72 | 

j ASSGN SYSLOG,X *01F * | 

| LCG | 

| ASSGN SYSRDR,X ' G0C * | 

| ASSGN SYSIPT,X'00 C' | 

| ASSGN SYSPCH,X'OOD' | 

| ASSGN SYSLST,X 1 00 E' | 

| ASSGN SYSREC,X'191' | 

L_J 


Step 6 

Perform a sorted DSERV to display the directories, and a DELETR to delete 
any relocatable components never tc be used. 

Not e: The listing can be checked to determine the size of the remaining 

library. 


r- 

|// JOB DSERVRLE | 

I // EXEC DSERV | 

| DSPLYS ALL | 

I /* I 

|// EXEC MAINT | 

j DELETR (Delete Desired Components frcir Relccatable Library) | 

I /* I 

|/6 I 

L_J 


Step 7 

Copy the relocatable library to a third initialized disk, defining it as a 
private relocatable library. During this copying, ycu can allocate the 
private library to the desired size. When allocating the size of the 
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private library, consider the components in the private relocatable library 
of Volume 3 and the workfile requirements discussed in step 9. To compute 
the minimum, size of a library, see Al l oc a ti n g Library Sizes . For 
techniques on copying libraries, see Mai ntenan ce Procedur es earlier in this 
module. 


If a small private relocatable library is built on the operational 
system, remove the pack from unit 191 and mount the initialized pack that 
the operational system is built on. Then, repeat this job with the proper 
EXTENT and NEWVCL statements. 


r- t 

| // JOB PVT'RLB | 

|// ASSGN SYSRLE,X'191* | 

[// DLBL IJSYSRL,'DCS PVT REL LIE',99/365,SD| 

|// EXTENT SYSRLE,nnnnnn,1,1,nnnn,nnnn | 

|// EXEC CORGZ | 

| NEWVCL RL=nnn(n) | 

I COPYR ALL | 

|/* | 

|/6 I 

|// PAUSE IPL VOLUME 2 | 

L_J 

Step 8 

Remove Volume 1 (the core image and relocatable library volume), and mount 
Volume 2 (the core image and source statement library volume). Dial the 
address (unit 190) of the system residence disk drive into the load unit 
switches and IPL (press LOAD) to pass control to the DOS supervisor. When 
the system enters the wait state, press START cn the card reader. These 
cards are in the card reader (SYSRDR/SYSIPT): 


r- i 

|ADD X'COC',3505 | 

jADD X'00D',3525P | 

|ADD X'COE',3211 | 

|ADD X'OIF',1050A | 

|ADD X'190',2311 | 

|ADD X'191',2311 | 

| ADD X'181',3420T9 | 

| SET DATE=06/3 0/72 | 

| ASSGN SYSLOG,X'OIF' | 

| LOG | 

| ASSGN SYSRDR,X'00C' | 

| ASSGN SYSIPT,X'00 C* | 

| ASSGN SYSPCH,X'00D' | 

| ASSGN SYSLST,X'00 E' | 

| ASSGN SYS001,X'191' | 

j ASSGN SYS002,X'191* [ 

| ASSGN SYS 003,X'191' | 

| ASSGN SYSREC,X'191' | 

L_J 


Step 9 

Define assembler workfiles for SYS001, SYS002, and SYS003 to the second 
drive. The workfiles SYS001, SYS002, and SYS003 are defined by use of the 
DLBL and EXTENT cards. These cards must be preceded by the OPTION STDLAEEI 
or OPTION FARSTE card. If these workfiles are on the same pack as the 
private relocatable library copied in Step 7, include the same DLBL and 
EXTENT cards for SYSRLB in this step (Step 9). 

Not e: Eecause it is difficult to determine the workfile allocations, it is 

best to allocate an entire pack. 
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1 


|// JOB ASSEMSUP | 
|// OPTION STDLAEEL | 
|// DLBL IJSYS01,'SYSTEM WORK FILE NO. 199/365,SE | 
|// EXTENT SYS001,nnnnnn,1,n,nnnn,nnnn | 
j// DLBL IJSYS02,'SYSTEM WORK FILE NC. 2',99/365,SE| 
|// EXTENT SYS002,nnnnnn,1,n,nnnn,nnnn | 
|// DLBL IJSYS03,'SYSTEM WORK FILE NC. 3 *,99/365,SE| 
|// EXTENT SYS003,nnnnnn,1,n,nnnn,nnnn | 
l_J 


Step 10 


Assemble the supervisor. 


r- 1 

|// EXEC ASSEMELY | 

| SUPVR MPS=YES | 

| CONFG MOEEL=135,DEC=YES,FP=YES | 

| STDJC LISTX=YES,1INES=46 | 

| FOPT IT= EG, PC=YES, OC=YES,'CCHAIN=YES, DASDFP= (1,1,2 311) , X j 

| SYSFIL=YES,TEBV=CR,PCIL=YES,TOD=YES,ZONE=(WEST,5) j 

| PIOCS CHANSW=RWTAU,TAPE=7 | 

j ALLOC Fl=14K,F2=14K | 

| IOTAE JIE=10,CHANQ=10,F1PGR=8,F2PGR=8,IODEV=10,BGFGR=10 | 

j DVCGEN CHUN=X'00C',DVCTYF=3505 | 

| DVCGEN CBUN=X* 00D *,DVCTYP=3525P | 

| DVCGEN CHUN=X * 00E',DVCTYP=3211 | 

| DVCGEN CHUN=X'OlF',DVCTYP=1050A | 

j DVCGEN CHUN=X'190',DVCTYF=2311 | 

| DVCGEN CHUN=X'191',DVCTYP=2 311 | 

| DVCGEN CHUN=X'180',DVCTYP=3420T7,CHANSW=YES | 

| DVCGEN CHUN=X'181',DVCTYP=3420T9,CHANSW=YES | 

j ASSGN SYSRDR,X'0 OC' | 

| ASSGN SYSIPT,X* 00C' | 

| ASSGN SYSPCH,X'00D' | 

| ASSGN SYSLST,X'00E' | 

| ASSGN SYSLOG,X'OIF' | 

| ASSGN SYSREC,X*191' | 

j ASSGN SYSLNK,X'191' | 

| ASSGN SYS001,X'191' | 

| ASSGN SYS002,X'191 * | 

| ASSGN SYS003,X'191' 1 

| ASSGN SYSC04,X'191' | 

j SEND 16384 j 

j END I 

I /* I 

j * CHECK ASSEMBLY LISTING FOR ERFCRS. IF CORRECT | 

| * REMOVE ASSEMBLED SUPERVISOR FROM SYSPCH. INSERT IN READER | 

I * FOLLOWING THE INCLUDE CARD OF JOB CATALSUP (IN STEP 13). | 

j // PAUSE TO CONTINUE PRESS END | 

I /6 I 

l_J 


Note: The operator needs to knew the address cf label CNLSVE in order to 

obtain a "special purpose dump”. As he normally does not have access to 
the supervisor assembly listing, ycu should locate the address in this 
listing and ask him to write it down under the heading "Special Purpose 
Dump" (Reference 10) in DOS Version 4 Me ss ages , GC33-5009. 
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Step 11 


Delete unwanted macros from the source statement library, and then create a 
private source statement library. If space allcws, this copy could he made 
to a free area of the pack to which the relocatable library was copied. 

For techniques on creating a new library, see Mainten an ce Prccedure s. 


r -.j 

|// JOE DELETSL | 

|// EXEC MAINT | 

j (include DELETS statements for those macro definitions that are not wanted on | 

| the private source statement library.All DELETS statements are included in the | 

j Z.DELETESL bcok that was displayed and punched in step 4.) j 

I /* I 

j/6 | 

|// PAUSE CHECK YOUR ALLOCATIONS AGAINST SYSTEM DIRECTORY. j 

|// JOE PVTSLB | 

|// ASSGN SYSSLB, X'191' | 

|// DLBL IJSYSSL,'DOS PVT SRC LIE',99/365,SD | 

|// EXTENT SYSSLB,nnnnnn,1,1,nnn,nnn j 

|* CREATE PRIVATE SOURCE STATEMENT LIBRARY ON UNIT 191 | 

|// EXEC CORGZ | 

| NEWVOL SL=nnn(n) | 

| COPYS ALL | 

I /* I 

I /£ I 

L_J 


Step 12 


This step defines the creation cf the system cere image library of your 
operaticnal pack. You can either delete the source statement library and 
reallocate the system to create a large core image library, cr reallocate 
to create a large core image and a small system source statement library on 
the operational pack. For techniques cn creating a new library, see 
Maintenance Pr ocedures. The number of cylinders allocated to CL must be at 
least two less than EXTENT for SYSRES. 
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“1 


|// JOE SYSRES 
I// EXEC MAINT 
| DELETS A.ALL,Z.ALL 

I /* 

|// DLEL IJSYSRS,'DOS SYSTEM RESIDENCE FILE 1 , 99/365,SD| 

|// EXTENT SYSRES, 111111,1,,0001 ,nrm9 | 

|// EXEC MAINT | 

| ALLOC CL=nnn(n),SL=0(0) | 

I I 

I /6 I 

|// JOB LABELS | 

|// OPTION STDLABEL | 

|// DLBL IJSYSLN,'SYSTEM WORK FILE NO. O',99/365,SD | 

|// EXTENT SYSLNK,nnnnnn,1,n,nnnn,nnnn | 

|// DLBL IJSYS01,'SYSTEM WORK FILE NO. 1*,99/365,SD j 
|// EXTENT SYS001,nnnnnn,1,n,nnnn,nnnn | 

j// DLBL IJSYS02,'SYSTEM WORK FILE NO. 2’,99/365,SD | 

|// EXTENT SYS002,nnnnnn,1,n,nnnn ,nnnn | 

|// DLEL IJSYS03,'SYSTEM WORK FILE NO. 3',99/365,SD | 

|// EXTENT SYS003,nnnnnn,l,n,nnnn,nnnn | 

j// DLBL IJSYSCL,'DOS PVT COR LIE',99/365,SD | 

|// EXTENT SYSCLB,nnnnnn,1,n,nnnn,nnnn | 

|// DLBL IJSYSRL,* DOS PVT REL LIE *, 99/365,SD | 

|// EXTENT SYSRLB,nnnnnn,1,n,nnnn,nnnn | 

|// DLBL IJSYSSL,* DOS PVT SRC LIE', 99/365,SD j 

|// EXTENT SYSSLB,nnnnnn,l,n,nnnn,nnnn | 

|// DLBL IJSYSRC,* DOS RECORDER FILE', 99/365,SD | 

j// EXTENT SYSREC,nnnnnn,1,l,nnnn,nnnn | 

I /* I 

I /£ I 

L_J 

Step 13 

During this step you must be IPLed from the operational pack that you are 
building and have your relocatable library on line. If linkage edit 
workfiles are net assigned, they must be assigned now. 

Linkage edit and catalog the assembled supervisor (object module from 
steplO) to the core image library. If the SE N D ad d ress i s larger th an the 
one used by t he s u perviso r bein g re pl aced, ce r tain ke y programs mus t also 
be li nkage edited and catal oge d t o th e core im age lib rary i n the same j ob 

step with the n ew supervisor ._ These key progr ams are the l ibrarian 

programs CORG Z, R SERV,_ and SSER V. The LINKEDIT deck punched out in step 4 

contains all of the necessary control statements to linkage edit all IBM 
components shipped on the system. If th e SEND add ress is n ot exceeded, 

only the supervisor need b e c a tal og ed ._The n ew super v iso r cannot be 

retrieved until af t er the / & is read. For any program being cataloged intc 
the core image library (CIL), the system places an entry in the CIL 
directory. In addition, for any program beginning with one of the special 
prefixes $, $$A, $$B, $$BO, or FGP, the system alsc places an entry in the 
appropriate subdirectory (if space is available) after /£ is read. The 
supervisor entry is placed in the transient (sub)directory even if it must 
overlay the last entry on the track. 

When retrieving one of these special prefix programs, the system first 
searches the appropriate subdirectory. If it does not find an entry for 
that program, the system then searches the CIL directory. Suppose in this 
job, the supervisor is cataloged, tut the job terminates before /£ is 
reached. The CIL directory contains an entry for the n ew supervisor (and 
entries for the other cataloged programs), but the transient directory 
still contains an entry for the o ld supervisor. If you IPL at this point, 
the system merely reloads the old supervisor. Tc recover from this 
situation, rerun the job with at least one special prefix program and all 
the programs in the steps that were net successfully completed. Including 
the special prefix program causes the subdirectories tc be updated 
(rewritten). To re-link edit and catalog more than described here uses 
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additional core image library space unnecessarily until a condense is 
performed. 

Do not attempt any other operations until the supervisor and the other 
programs in this job are cataloged, /£ is reached, and the subsequent IPL 
is performed. 

Step 13 contains the coding fcr including the IBM system service and 
control programs. The LINKEDIT book displayed and punched in step 4 
contains all the necessary job control statements to linkage edit any of 
the IBM components shipped on the system. Ycu are encouraged to use this 
book to tailor a jcb stream to include any IBM components desired. 


r - n 

// JOB CATALSUP 
// ASSGN SYSRLE,X'191' 

// ASSGN SYSLNK,X'191' 

// OPTION CATAL 
ACTION CLEAR 
INCLUDE 

(Supervisor object deck here.) 

/* 

// EXEC LNKEDT 

INCLUDE IJBSL3 RSERV 

// EXEC LNKEDT 

INCLUDE IJBSL4 SSERV 

// EXEC LNKEDT 

INCLUDE IJBSL5 CORGZ 

// EXEC LNKEDT 
PHASE LSERV,S cr +0 (Note) 

INCLUDE IJBLSERV 
// EXEC LNKEDT 
/£ 


Not e; S is required for a non-MES system and +0 for an MPS system. 

Step 14 

At this point the system indicates that re-IPL is needed. IPL from SYSRES 

(190). 

Re-IPL, issue the SET statement and create the recorder file. 

Linkage edit and catalog any additional ccmpcnents desired tc the core 
image library. See the section for each IBM component for its cataloging 
control statements. Before the next step is performed, perform an LSERV tc 
display the label cylinder, check the linkage editor listings, and make all 
necessary corrections. 

You may delete unwanted transients by executing selected jobs from the 
Z.EELETECL book, punched in step 4. 


r- 

| SET | 

I Put your DELETEC jcb stream here, if desired. | 

I /* I 

I /6 I 

I ASSGN SYSRLB,X'191’ | 

j ASSGN SYSSLB,X'191' | 

|// JOB CATALCLB | 

|// OPTION CATAL | 

| (Linkage edit desired components and user programs tc the core j 

| image library.) | 

| // EXEC LNKEDT | 

I - /+ I 

I /6 I 

L_ J 
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Step 15 


Perform all necessary assemblies. (If System/370 instructions are to be 
assembled. Assembler D (14K) must be present in the core image library.) 
The assemblies for components should be performed as separate jets. For 
the information required to assemble Emulator Programs, refer to the 
Em u lator Prog ram manuals listed in the Pr efac e. Be careful to keep all 
assemblies in order. 


Assemble all your required ICCS modules. By assigning SYSPCH to a tape 
unit, the IOCS modules can be cataloged to the relocatable library without 
punching them on cards. The ICCS modules required by compilers as defined 
in the section Compiler IOCS modules are supplied in the relocatable 
library by IBM. 


After you have assembled your pregrams, close the tape assigned to 
SYSPCH and reassign SYSPCH to its permanent assignment by using the close 
command. The assembly listings should be checked fer errors before 
proceeding. 


Now assemble the IOCS modules to be cataloged to the relocatable 
library. Unit 281 must be unassigned. Modules should be assembled on an 
as-required basis. The following is an example: 


r- i 

| // JOE ASSEM 1 
j// OPTION DECK,LIST,LOG j 
|// ASSGN SYSPCH,X'281' | 
j// EXEC ASSEMBLY | 

I CDMOD RECFORM=FIXUNB,CTLCHR=ASA,TYPEFLE=CUTPUT,ICAREA2=YES, X | 
| DEVICE=352 5,SEFASMB=YES | 
| END | 

II 

j// EXEC ASSEMELY j 
| MTMOD RECFCRM=FIXUNB,READ=FORWARD,CKPTREC=YES,SEPASMB=YES | 
I END | 

j/* I 

| CLOSE SYSPCH,X * COD* | 
|/S j 
I* CHECK ASSEMELY LISTINGS FOR ERRORS. RELOAD 281 WITH THE SAME TAPE. j 
j// PAUSE IF CORRECT,PRESS END TC CONTINUE. | 

L-J 


Step 16 


Reload the tape that was assigned to SYSPCH in step 15 and assign it to 
SYSIPT. With this tape the MAINT program catalogs the ICCS modules to the 
relocatable library by the control card // EXEC MAINT. You may set new 
standard labels (OPTION STDLABEL), reallocate library sizes, and set 
automatic condense limits, if required. Backup fer the operational disk 
can be obtained by copying the operational disk pack to tape by using the 
copy disk-to-tape utility program. 


System generation for Volume 1 and 2 users is complete. You may set new 
standard label (OPTION STDLABEL), reallocate library sizes, and set 
automatic condense limits, if required. The recorder file (IJSYSRC) should 
then be created again (see Reco r der F i le ( SYS R EC) . 
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|// JOB CATALRLB | 

|// ASSGN SYSIPT f X*281' | 

|* CATALOG MODULES TO RELOCATABLE LIBRARY j 

|// EXEC MAINT | 

|/* | 

j* THE FOLLOWING DELETIONS ARE OPTIONAL. | 

|// PAUSE PLACE REMAINING CARDS IN READER. PRESS END TO CONTINUE.| 

]// EXEC MAINT | 

j (Place any desired deletes here.) | 

| CONDS RL,SL | 

\/* | 

|/6 | 

L_J 

If you desire components frcir Volume 3, proceed tc System Generation 
Procedures for Volume 3 Users . 

Note: A copy of the new operational pack should be obtained for backup 

after the system generation process is completed. 


Step 17 

Create the desired private core image library or libraries. You may use a 
private core image library for expansion of the system cere image library. 
In systems supporting the batched-job foreground option, create a private 
core image library for each batched-jcb foreground partition desired. You 
may set standard labels (OPTION STDLABEL or OPTION PARSTD) if required. 

r- 1 

|// JOB PVTCLB | 

|// ASSGN SYS003,X'191' | 

j// DLBL IJSYSPC,'DOS PVT CORE IMAGE LIB',99/365,SD| 

j// EXTENT SYS003,nnnnnn,1,1,nnnn,nnnn | 

|// EXEC CORGZ | 

| NEWVCL CL=nnn(nn) | 

|/* I 

|/& | 

L_J 


Now the desired components may be link-edited and cataloged into the 
private core image library or libraries. If it is desired to link-edit a 
non-relocatable IBM-supplied program for execution in a foreground 
partition (if enough core storage is available in which to execute the 
link-edited program), start the desired partition and execute the linkage 
editor in that partition using the same input as for the background 
partition. 
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One IBM 2311 Disk Drive Example 


Figure 1-21 illustrates the ge neral procedure followed fcy users with a 
single 2311 disk drive available. 



Figure 1-21. 


PROCEDURES—Overview of Single Disk Systeir Generation 
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IEM supplies the 14K disk workfile assembler in the core image library of 
Volume 2. The following procedure employs this assembler variant for 
system generation. to use another variant: 

• Linkage edit and catalog the desired assembler tc the cere image library 
of the relocatable library system. 

• CSERV the assembler just cataloged. 

• Delete the supplied assembler frem the core image library of rhe source 
statement library system, and condense this library. 

• Catalog the assembler obtained through the previous CSERV to the core 
image library of the source statement library vcluire. 

Now system generation as described can be performed. Figure 1-22 
illustrates the system configuration upon which the One IBM 2311 Disk Drive 
Example is based. 


INP UT/OUTPU T DE VICE CONFIGURATION FO R SIN GLE DI SK E XA MPLE (FIGURE 1-2 2) 


Device 

Channel 

Unit 

Use 

2540R 

0 

OC 

Card Reader (SYSRDR/SYSIPT) 

2540P 

0 

0D 

Card Punch (SYSPCH) 

1403 

0 

0E 

Printer (SYSLST) 

3210/3215 

0 

IF 

Console Printer-Keyboard (SYSLOG) 

2401T7 

2 

80 

Magnetic Tape with data conversion feature 
(switchable to channel 1) 

2311 

1 

90 

Disk (SYSRES, SYSLNK, SYSREC, SYS001, SYS002, SYS003) 



SYSLOG SYSLST SYSRDR/SYSIPT SYSPCH 


Figure 1-22. PROCEDURES--System Configuration for the One IEM 2311 Disk 
Drive Example 
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SINGLE DISK EXAMPLE: RESULTS OF SYSTEM GENERATION 


When systeir, generation is completed for single disk example, the 
operational pack contains user selected components and programs, together 
with the installation's tailored supervisor, jofc control, linkage editor, 
and librarian programs in the core image library. The tape shipped by IEM 
is retained as a backup tape. The relocatable library contains all those 
components shipped by IBM except these that were deleted in steps 10 and 
14. There is no source statement library on this operational pack. This 
is optional, and was indicated as such in the example. You may either 
utilize the source statement library shipped by IBM on the source statement 
library volume, or build a source statement library on the operational pack 
by allocating space and cataloging the desired macro definitions. 


DIS K- ONLY USERS 

Disk-only users receive the 2311 system on 1316 disk packs. 

• Mount Volume 2 (the IBM-supplied core image library and source statement 
library pack) and proceed to step 3. 


TAP E USER S 

Disk users with at least one tape unit available receive the 2311 system on 
one or two reels of magnetic tape. This IBM-supplied tape is capable of 
restoring the 2311 system on 1316 disk packs. 

• Mount the IEM-supplied tape and a disk pack and proceed as fellows: 


Step 1 

Before restoring the tape, take the necessary action to perform or bypass 
the initialize routine. 

a. If the disk pack has not keen initialized, the IBM-supplied volume, a 
self-loading tape, is capable of initializing the pack. Any volume 
serial number used in the EXTENT cards for the fcllcwing steps must 
agree with the volume serial number in the VOL card for the initialize 
disk control card. 

If initialization is required, mount a pack on unit 190. Mount the 
IBM-supplied tape on unit 280 (7-track drive). Place the following cards 
in the card reader. Dial unit 280 in the load unit switches and press 
LOAD. When the system enters the wait state, press START and EOF on the 
card reader. To initialize additional packs rewind the IEM-supplied tape 
and repeat the procedure for each pack. The multipart forms of the linkage 
editor maps and the supervisor listing are required by your IBM customer 
engineer and your system programmers for maintenance purposes. 


r- 1 

| // LOG | 
|// JOE INTDSK | 
|// DATE 72182 | 
|// ASSGN SYSLOG,X’OIF*,C1 | 
|// ASSGN SYSOPT,X'190',D1 | 
| // EXEC | 
|// UID IA | 
|// VTOC STRTAER=(0199000),EXTENT=(10) | 

| VOLlllllll | 
|// END J 
L_J 


b. If the disk pack has been previously initialized, the initialize disk 
routine can be bypassed. Any volume serial number used in the EXTENT 
cards for the following steps must agree with the volume serial number 
used when the pack was initialized. 
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To bypass the initialize disk prograir on the IBM-supplied tape, 
mount the IEM-supplied tape on unit 280 (7-track drive). Mount an 
initialized disk on unit 190 (VTOC on CYL 199). Insert the following 
control cards into the reader. Dial 280 in load unit switches and 
press LOAD. When the systeir enters the wait state, press START and 
EOF on the card reader. The job is complete when the 00C and 4000A 
messages are logged. 

r-1 

|// LOG | 

j// JOE INTDSK | 

|// DATE 72182 | 

|// ASSGN SYSLOG,X'OIF*,Cl| 

|// ASSGN SYSIPT,X'280*,T1| 
j// FILES SYSIPT,1 | 

L_J 

Step 2 

After step 1 is completed, restore the systems from the self-loading tape 
to the initialized packs. This step is omitted when a system is received 
on disk. 

Do not rewind unit 280. To load the tape on the disk, place the 
following cards in the reader. Dial 280 in the lead switches and press 
LOAD. When the system enters the wait state, press START and EOF on the 
card reader. See Restoring the IBM-Supplied System T a pe-to-Disk for 
operating procedures. 

r- 1 

\// JOB DISRST | 

|// DATE 72182 | 

(// ASSGN SYS000,X'190*,Dl | 

|// ASSGN SYS001,X'190' ,D1 | 

|// ASSGN SYSLCG,X'01F',Cl | 

|// ASSGN SYSLST,X'00E',LI | 
j// EXEC | 

L_J 

Step 3 

Dial 19C (the address of the unit containing Volume 2) in the lead unit 
switches and press LOAD. When the system enters the wait state, press 
START and EOF on the card reader tc pass ccntrcl tc the DOS supervisor). 
See I PL C ontrol and ASSGN Stateme n ts f or System Generatio n, later in this 
module, for the IPL control statements. The following cards are in the 
card reader. 


r - 

| ADD X'C0C *,254 OR \ 


| ADD X* 00D',2540P | 
| ADD X’C0E',1403 | 
jADD X'01F' ,1050A | 
| ADD X*190',2311 | 
|ADD X'180',2400T7 | 
|SET DATE = 0 6/3 0/72 | 
|ASSGN SYSLOG,X'01F' | 
I LOG | 
| ASSGN SYSRDR,X'00C' | 
j ASSGN SYSIPT,X'OOC' | 
jASSGN SYSPCH,X'00 D' | 
| ASSGN SYSLST,X'OOE' | 
j ASSGN SYS001,X*190' | 
| ASSGN SYS002,X'190' | 
| ASSGN SYS003,X'190' | 

| ASSGN SYSREC,X'190' | 
| SET RF=CREATE | 
L_J 
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Step 4 


Perform a sorted DSERV to display the directories. SSERV (display and 
punch) all the desired sample problems from the source statement library 
into cards. Punched output includes the sample problems with BKEND and 
CATALS cards. Four other books in the source statement library that should 
be punched out at this time (Z.LINKEDIT, Z.DELETECL, Z.DELETERL, and 
Z.DELETESL) contain the necessary ccntrcl statements tc selectively linkage 
edit and delete all IBM components. The sample problem program names, the 
linkage edit, and the delete bock names can be chosen and punched using the 
DSPCH statements. 


|// JOB DSERVSLB 
|// EXEC DSERV 
I DSPLYS ALL 

V* 

\// EXEC SSERV 
| DSPCH Z.ALL 
\/* 
j/S 

I* REMOVE SAMPLE PROBLEMS, DELETE ECCKS, AND THE LINK EDIT 
{// PAUSE BOOK CARDS FROM SYSPCH, PRESS END TO CONTINUE. 


Step 5 


After these sample problems and books have been punched, they can be 
deleted from the source statement library along with unwanted macros (e.g., 
those components never to he used). 


r - n 

j// JOE DELETE j 
j// EXEC MAINT j 
j DELETS Z.ALL j 
j (Delete other unwanted components from the source statement library)j 
|/* | 
J// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE *,99/365,SD | 
|// EXTENT SYSRES,111111,1,n,nnnn,nn9 | 
\// EXEC MAINT j 
j ALLOC CL=nn(n),SL=nn(n) j 
j/* | 
|/& | 
i---j 


Step 6 

To obtain space needed for workfiles to perform assemblies, (SYS001, SYS002 
and SYSC03) reallocate the system tc take advantage cf the space gained by 
the deletes from the previous step. The workfiles SYS001, SYS002, and 
SYS003 are defined by use of the DLEL and EXTENT cards. These cards must 
be preceded by the OPTION STDLAEEL or CPTICN PARSTD card. SYSRES now 
contains the original core image library and a tailored source statement 
library. 
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|// JOB ASSEM 
|// OPTION STDLAEEL 
|// DLBL IJSYS01,'SYSTEM WORK FILE NC. 1' , 99/365,SE| 
j// EXTENT SYS001,111111, 8 ,n,nnnO,nnn,2 | 

|// DLBL IJSYS02,'SYSTEM WORK FILE NC. 2',99/365,SE| 
j// EXTENT SYS0Q2,111111, 8 , 11 , nnn3,nnn, 5 | 

j// DLBL IJSYS03,'SYSTEM WORK FILE NC. 3' # 99/365,SE| 
j// EXTENT SYS003,111111,8,n,nnn6 ( nnn,9 | 

L_J 


Step 7 

Assemble the supervisor. 


// EXEC ASSEMBLY 

SUPVR ERRLOG=YES 

CONFG MODEL=l35,DEC=YES ,FP-YES 

STDJC LISTX=YES,LINES=46 

FOPT IT=BG,PC=YES,OC=YES ,TEBV=IR,TOD=YES,ZONE=(WEST,5) 
PIOCS CHANSW=RWTAU,TAPE=7 

IOTAB IODEV=10,JIB=8,CHAN£=6,D2311=1,D2400=1 
DVCGEN CHUN=X'00C',DVCTYP=2540R 

DVCTYF = 2 540P 
DVCTYP=1403 
DVCTYP=1050A 
DVCTYP = 2 311 

DVCTYP=24 007,CHANSW=YES,MODE=X'90' 


DVCGEN CHUN=X'00D' 

DVCGEN CHUN=X'00E' 

DVCGEN CHUN=X* OlF' 

DVCGEN CHUN=X' 190' 

DVCGEN CHUN=X'180' 

ASSGN SYSRDR,X'OQC 
ASSGN SYSIPT,X'00C 
ASSGN SYSPCH,X'00D 
ASSGN SYSLST,X'00E 
ASSGN SYSLOG,X'OIF 
ASSGN SYSREC,X'190 
ASSGN SYSLNK,X'190 
ASSGN SYS001,X'190 
ASSGN SYS002,X*190 
ASSGN SYS003,X'190 
SEND 14336 
END 

/* 

* CHECK ASSEMBLY LISTINGS FOR ERRORS. IF CORRECT 

* REMOVE ASSEMBLED SUPERVISOR FROM SYSPCH, INSERT IN READER 

* FOLLOWING THE INCLUDE CARD IN STEP 13 

/& 


Not e; The operator needs to knew the address of label CNLSVE in order tc 
obtain a "special purpose dump". As he normally dees net have access to 
the supervisor assembly listing, you should locate the address in this 
listing and ask him to write it down under the heading "Special Purpose 
Dump" (Reference 10) in D OS Version 4 Message s, GC33-5009. 


Step 8 


Perform all necessary assemblies. The assemblies for components should be 
performed as separate job steps. Be careful tc keep all assemblies in 
order. 

If the operational system contains a minimum source statement library 
with selected macros, obtain these macros through an SSERV. The macros 
obtained in this step will later be cataloged to a system source statement 
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library. Remove Volume 2 (the core image and source statement library 
pack), and replace it with Volume 1 (the cere image and relccatalle library 
pack). The pack removed should he retained for backup if the system was 
received on disk packs; otherwise, the tape can be retained for backup. 


r - 

|// JOB ASSEM2 | 
|// OPTION DECK,LIST,LOG | 
| // ASSGN SYSPCH ,X'28 0 * | 
|// EXEC ASSEMELY | 
I CDMOD RECFORM=FIXUNB,CCNTRGL=YES,TYPEFLE=INPUT,DEVICE=2540, X | 
j SEPASMB=YES | 
| END | 

}/* I 

I// EXEC ASSEMBLY | 
| MTMOD RECFORM=VARUNB,CKPTREC=YES,WORKA=YES,SEPASMB=YES | 
| END I 

I /* I 

|CLOSE SYSPCH,X’OOD' | 
|/6 | 
|// PAUSE | 
L_J 


Step 9 

Dial the address (unit 190) of the system residence disk drive into the 
load unit switches, and IPL (press LOAD) tc pass control to the DOS 
supervisor. When the system enters the wait state, press START and EOF on 
the card reader. The following cards are in the card reader. 


r-1 

| ADD X'COC',2540R | 
| ACE X'00D',2540P ! 
| ADD X'COE',1403 i 
|ADD X* OIF',1050A | 
|ADD X'190',2311 | 
|ADD X*180',2400T7 | 
|SET DATE = 06/3 0/72 | 
|ASSGN SYSLOG,X'01E 3 | 
| LOG | 
|ASSGN SYSRDR,X * 00C* | 
|ASSGN SYSIPT,X'00C * | 
| ASSGN SYSPCH,X*00D* | 
|ASSGN SYSLST,X'00E * | 
|ASSGN SYSLNK,X * 190* | 
| ASSGN SYSOO^X'igO' | 
l_J 


Step 10 

Perform a sorted DSERV to display the directories. Delete all relocatable 
library components not to be used. 

r - 1 

|// JOB DSERVRLB | 

|// EXEC DSERV j 

| DSPLYS ALL | 

|/* | 

|// EXEC MAINT | 

| DELETE (Delete desired components from the relocatable library.)} 

\/* | 

i_ j 
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Step 11 

Reallocate library sizes, assigning all free space with the exception cf 
linkage editor workfiles, to the core image library. If room is available 
at this time, also allocate the small source statement library tc contain 
these macros punched in step 8. Otherwise, this allocation can be done in 
step 15. 


r-1 

|// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE 111111 *, 99/365,SC | 
|// EXTENT SYSRES,111111,1,n,0001,nn9 | 
| // EXEC MAINT | 
j ALICC CL=nn(n),RL=nn(n) | 

| /* | 

j/6 | 

|// JOB LABELS | 
|// OPTION STDLAEEL | 
|// DLBL IJSYSLN,’SYSTEM WCRK FILE NC. O’,99/365,SE | 
|// EXTENT SYSLNK,nnnnnn,1,n,nnn,nnn j 
j// DLBL IJSYS01,’SYSTEM WORK FIIE NC. 1',99/365,SE | 
|// EXTENT SYS001,nnnnnn,1,n,nnn,nnn | 
|// DLBL IJSYSRC,'DCS RECORDER FILE',99/365,SD j 
j// EXTENT SYSREC,nnnnnn,1,1,nnnn,nnnn j 

I /+ I 
|/6 | 
L_■_J 


Step 12 

Linkage edit and catalog the assembled supervisor (frem step 7) to the cere 
image library. Ce rtain key p r ogr a ms m ust also be linkage edited and 
cataloge d in t he same job with the new superv i sor if the S ENE addres s is 
larger than the cne used by the super v isor being replaced. These key 
programs are t he librarian programs C O RGZ, RSERV, and SSER V. The control 
statements to linkage edit these pregrams are in the linkage edit deck 
punched out in step 4. The SSERV and assembler ccmpcrents should be 
included as part of this job only if the operational system is to contain a 
minimum source statement library. 

The new superv i sor cannot be retrieved unt i l aft er the /£ is read . For 
any program being cataloged into the core image library (CIL), the system 
places an entry in the CIL directory. In addition, fer any program 
beginning with cne of the special prefixes $, $$A, $$B, $$EC, or FGP, the 
system also places an entry in the appropriate subdirectory (if space is 
available) after /6 is read. The supervisor entry is placed in the 
transient (sub)directory even if it must overlay the last entry on the 
track. 

When retrieving one of these special prefix programs, the system first 
searches the appropriate subdirectory. If it dees net find an entry for 
that program, the system then searches the CIL directory. Suppose, in this 
jot, the supervisor is cataloged, but the job terminates before /& is 
reached. The CIL directory contains an entry fer the new supervisor (and 
entries for the ether cataloged programs), but the transient directory 
still contains an entry for the cld supervisor. If ycu IPI at this point, 
the system merely reloads the old supervisor. To recover from this 
situation, rerun the job with at least one special prefix program and all 
the programs in the steps that were not successfully completed. Including 
the special prefix program causes the subdirectories to be updated 
(rewritten). To re-link edit and catalog more than described here uses 
additional core image library space unnecessarily until a condense is 
performed. 

Do not attempt any other operations until the supervisor and the other 
programs in this job are cataloged, /£ is reached, and the subsequent IPL 
is performed. 
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// JOE CATAL 
// OPTION CATAL 
ACTION CLEAR 
INCLUDE 

Supervisor object deck here 
/* 

// EXEC LNKEDT 
INCLUDE IJBSL3 
// EXEC LNKEDT 
INCLUDE IJBSL4 
// EXEC LNKEDT 
INCLUDE IJBSL5 
// EXEC LNKEDT 
INCLUDE IJQD16W 
// EXEC LNKEDT 
PHASE LSERV, S or +0 (Note) 

INCLUDE IJBLSERV 
// EXEC LNKEDT 
/& 

Note ; S is required for a non-MPS system 
and +0 for an MPS systeir. 


RSERV 


SSERV 


CORGZ 


DISK WCRKFILE ASSEMBLER 


Step 13 

After these key programs have been cataloged, re-IFL, issue the SET 
statement and create the recorder file. 

Linkage edit and catalog any additional components desired to the core 
image library. See the section for each component for a complete list of 
control cards for that component. The LINKEDIT deck punched cut in step 4 
contains all of the necessary control statements to linkage edit all 
components shipped on the system. 

Eefore the next step is performed, perform an LSERV to display the label 
cylinder, check the linkage editor listings and make all necessary 
corrections before deleting the modules from the relocatable library. 

r- n 

| SET | 

|// JOB CATAL | 

|// OPTION CATAL | 

|* AT THIS POINT LINKAGE EDIT DESIRED COMPONENTS AND PROGRAMS j 

]// EXEC LNKEDT | 

|/* I 

j// PAUSE CHECK LISTING FOR ERRORS,IF CORRECT PRESS END TC CCNTINUE| 

L_J 


Step 14 

If the components deleted in step 10 did net provide adequate space for the 
final allocation of system libraries, a new allocation can be performed by 
deleting components previously cataloged to the core image library. Mere 
then one deletion and allocation may be required during linkage edit jobs. 

If a small source statement library is desired, allocate space for one. 

r-1 

|// EXEC MAINT j 

| DELETR Delete the unwanted component programs from the relocatable library: | 
| CONES RL | 

\/* | 

|/6 | 

l_j 
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Step 15 

Catalog the modules assembled in step 8 to the system relocatable library. If 
your decision was to have a source statement library cn this pack, catalog the 
source statement macros punched in step 8 to the system source statement library. 

Set new standard labels, reallocate library sizes, and set automatic condense 
limits. Backup for the operational system should also be obtained. The recorder 
file (IJSYSRC) should then be created again. See Reco rder File _ (SYSRE C). 

r- 1 

|// JOB CATAL | 

|* RELOAD 280 WITH THE TAPE CREATED IN STEP 8. | 

I* CHECK ASSEMBLY LISTING FOR ERRORS. IF CORRECT| 

|// PAUSE TYPE END TO CONTINUE | 

|// ASSGN SYSIPT,X'280 * | 

|* CATALOG MODULES TO RELOCATABLE LIBRARY | 

|// EXEC MAINT | 

|/* | 

|/& I 

L _J 


If you want components from Volume 3, go to System G eneration Proc edures for 
Volume 3 User s. 

Not e: After system generation is complete, obtain a copy of the operational 

pack(s) for backup. 
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System Generation Procedures for Volume 3 Users 

This procedure provides instructions for including Volume 3 into the system 
generation procedure for both the single-disk user and the irultiple-disk user. 

The sequence of arrangement cf these instructicns is net necessarily the 
sequence that must be followed. Most users who desire components from Volume 3 
will not have to execute each cf the steps of this procedure. It is your 
responsibility tc choose the steps that you require for your given procedure. 

The following assumptions have been made: 

• SYSRES is on any pack. 

• IPL has been performed. 

• SYSLOG, SYSRDR, SYSIPT, and SYSLST have been assigned. 


Step 1 

Perform a sorted DSERV of SYSSLE and SYSRLB on Volume 3. The DLBL and EXTENT 
statements are net required if the SYGRES pack is Volume 3, because the label 
cylinder for SYSRES on Volume 3 contains these statements. SYSSLB defines the 
private source statement library, and SYSRLB defines the private relocatable 
library. 


r-1 

|// JOB DSERVPLE | 

|// PAUSE ASSGN SYSSLB AND/OR SYSRLB TC VOL.3,PRESS END TO CONTINUE. | 
j// DLBL IJSYSSL,'DOS.SYSSLB.FILE.VOLUME.3*,99/365,SD | 

|// EXTENT SYSSLB,111111,l,l,nnn,nnn j 

j// DLBL IJSYSRL,'DOS.SYSRLB.FILE.VOLUME.3', 99/365,SD | 

|// EXTENT SYSRLB,111111,1,1,nnn,nnn | 

|// EXEC DSERV j 

| DSPLYS RD,SD | 

|/* | 

I I 

l_J 


Step 2 

Merge from Volume 3 to another private library pack. SYS000 defines the private 
source statement library of Volume 3. SYSSLB defines the private source 
statement library of another pack. SYS001 defines the private relocatable 
library of Volume 3. SYSRLB defines the private relocatable library of another 
pack. 


r-1 

|// JOB MERGEPRV j 
|// PAUSE ASSIGN SYS000, SYSSLE AND/OR SYS001, SYSRLB | 
| // DLBL IJSYSPS,'DOS.SYSSLB.FILE.VOLUME.3',99/365,SD j 
j// EXTENT SYS000,111111,1,1,nnn,nnn | 
|// DLBL IJSYSSL,'DOS PVT SRC LIE*,99/365,SD | 
j// EXTENT SYSSLE,nnnnnn,n,n,nnnn,nnnn | 
I // DLBL IJSYSPR,'DOS.SYSRLB.FILE.VOLUME.3',99/365,SD | 
|// EXTENT SYS001,111111,1,1,nnn,nnn | 
|// DLBL IJSYSRL,'DOS PVT REL LIE*, 99/365,SD | 
j// EXTENT SYSRLE,nnnnnn,n,n,nnnn,nnnn | 
|// EXEC CORGZ | 
| MERGE PRV,PRV j 
j COPYR (Copy desired modules frem private relocatable library) | 
j COPYS (Copy desired books from private source statement j 
| library) | 
\/* | 
|/& | 
L-J 
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Step 3 


Merge from Volume 3 to another SYSRES. SYS000 defines the private source 
statement library of Volume 3. SYS001 defines the private relocatable library of 
Volume 3. 


r-1 

|// JOB MERGERES | 
|// PAUSE ASSIGN SYS000 AND/OR SYS001 10 VOLUME 3 j 
]// DLBL IJSYSPS,'DOS.SYSSLB.FILE.VOLUME.3',99/365,SD | 
|// EXTENT SYSOOO,111111,1,1,nnn,nnn | 
J// DLBL IJSYSPR,'DOS.SYSRLB.FILE.VOLUME.3',99/365,SD ^ j 
j// EXTENT SYS001,111111,1,1,nnn,nnn | 
|// EXEC CORGZ I 
| MERGE PRV,RES | 
| COPYR (Copy desired modules (ccirpcnents) frcir private relocatable library) j 
j COPYS (Copy desired books(components) from pvt. source statement library) j 
\/* | 
|/S | 
L_J 


Step 4 


RSERV and/or SSERV of Volume 3. Display and punch the desired components from 
the private libraries of Volume 3. The DLBL and EXTENT statements are ne t 
required if the SYSRES pack is Volume 3. 


r-1 

|// JOB PUNCHPLB | 
]// PAUSE ASSIGN SYSSLB AND/OR SYSRLB TO VOLUME 3 AND SYSPCH TO A TAPE. j 
|// DLBL IJSYSSL,'DOS.SYSSLB.FILE.VOLUME. 3',99/365,SD | 
|// EXTENT SYSSLE,111111,1,1, nnn,nnn | 
|// EXEC SSERV I 
| DSPCH (Punch desired components from private source statement library)| 
\/* | 
|// DLBL IJSYSRL,'DOS.SYSRLB.FILE.VOLUME.3',99/365,SD | 
|// EXTENT SYSRLB,111111,1,1,nnn,nnn | 
|// EXEC RSERV j 
| PUNCH (Punch desired components frem private relocatable library) J 

j/* | 

|// PAUSE CLOSE SYSPCH j 
|/& | 
L_J 


Step 5 


Linkage Edit from Volume 3. Linkage edit the desired components from the private 
relocatable library of Volume 3 to a cere image library cf another pack. The 
DLEL and EXTENT statements are not required for SYSLNK and SYS001 if they have 
teen previously defined as standard labels. The ccntrcl cards to linkage edit 
the desired components are available in the Z.LINKEDIT book from the source 
statement library of Volume 2. 
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r - 

j// JOE LINKRLE 

|// PAUSE ASSIGN SYSRLB TO VOLUME 3. ASSIGN SYSLNK ANE SYS001 WORKFILES. 

I// DLBL IJSYSRL,’DOS.SYSRLB.FILE.VOLUME.3',99/365,SD 
j// EXTENT SYSRLB,111111,1,1,nnn,nnn 
|// DLEL IJSYSLN,'SYSTEM WORKFILE NO. O', 99/365,SD 
j// EXTENT SYSLNK,nnnnnn,n,n,nnnn,nnnn 
|// DLEL IJSYS01,'SYSTEM WORKFILE NO. 1',99/365,SD 
|// EXTENT SYS001,nnnnnn,n,n,nnnn,nnnn 
|// OPTION CATAL 

j (Include desired components frcm private relocatable library) 

|// EXEC LNKEDT 

I / + 

|/S 

L_J 


Step 6 


Assemble from Volume 3. Prograirs in the private source statement library cf 
Volume 3 can be assembled by using Assembler D which is in the core image library 
of Volume 3. If workfiles have to be assigned to Volume 3, they must be defined 
and additional cylinders can be allocated by having the wcrkfile extents overlay 
the private relocatable library. 


r-1 

|// JOE ASSEMPRV | 

|// PAUSE ASSIGN SYSSLB TO VOLUME 3. ASSIGN WORKFILES SYS001, 2, and 3. | 

j// DLBL IJSYSSL,'EOS.SYSSLB.FILE.VOLUME.3',99/365,SD | 

|// EXTENT SYSSLB, mill,1,1,nnnn,nnnn | 

j// DLEL IJSYS01,'SYSTEM WORKFILE NO. l',99/365,SD | 

j// EXTENT SYS 001,nnnnnn,n,n,nnnn,nnnn | 

j// DLEL IJSYS02,'SYSTEM WORKFILE NO. 2’,99/365,SD j 

j// EXTENT SYS002,nnnnnn,n,n,nnnn,nnnn j 

|// DLEL IJSYS03,'SYSTEM WORKFILE NO. 3’,99/365,SD | 

|// EXTENT SYS003,nnnnnn,n,n,nnnn,nnnn | 

|// EXEC ASSEMELY | 

j (Source deck) | 

|/* | 

I /6 | 

L_J 


Step 7 

Catalog the components punched out in Step 4. SYSRLB and SYSSLB must be assigned 
if the programs on SYSIPT are cataloged to private libraries. 

r - n 

|// JOB CATALOG | 

|// PAUSE ASSIGN SYSRLB AND/OR SYSSLB. ASSIGN SYSIPT TO TAPE OF PUNCHFLE j 
\// EXEC MAINT | 

|/* | 

|/6 | 

L-J 
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IBM 2314 Direct Access Storage Facility Example 


Figure 1-23 illustrates the ge nera l procedure tc be followed by users with a 2314 
available. 



Figure 1-23. PRCCEDURES--Cverview of a 2314 Systeir Generation 
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This example is one of the many possible methods for generating a system. 
Figure 1-24 illustrates the system configuration upon which the 2314 Example is 
based. 


INPUT/OUTPUT DEVICE CONFIGURATION FOR 2314 EXAMPLE (SEE FIGURE 1-24) 


Device 

Channel 

Unit 

Use 

3505 

0 

OC 

Card Reader (SYSRDR, SYSIPT) 

3525P 

0 

0D 

Card Punch (SYSPCH) 

3211 

0 

0E 

Printer (SYSLST) 

3210/3215 

0 

IF 

Console Printer-Keyboard (SYSLOG) 

2314 

1 

30 

Disk (SYSRES, SYSLNK, SYSREC, SYS001, SYS002 
SYS003, SYS004) 

3420T9 

2 

80 

Magnetic Tape 


2314 EXAMPLE: RESULTS OF SYSTEM GENERATION 


When system generation is completed, the operational disk of the installation 
contains user selected components and programs in its core image library, 
together with the installation's tailored supervisor, job control, linkage 
editor, and librarian programs. The tape shipped by IBM is retained as backup 
tape. It is a self-loading tape capable of being restored on disk. The sample 
problems are punched out during step 4. Libraries contain all modules and macro 
definitions shipped from IBM. The core image library is built to contain those 
IBM programs chosen. 

The libraries are condensed, and IOCS modules are assembled and cataloged to 
the relocatable library. When system generation is completed, the sample 
problems should be run against the operational pack to ensure correct creation of 
all system programs. 



SY SR DR 

SYSLOG SYSLST SYSIPT SYSPCH 

Figure 1-24. PROCEDURES--System Configuration for 2314 Example 
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IBM 2314 (AND, OPT IONALLY, 2 319) O NLY US ERS 

IBM 2314-only users receive the 2314 system on a 2316 disk pack. This 
IBM-supplied pack consists of a core image library, a relocatable library, 
and a source statement library. 

• Mount the IBM-supplied volume and proceed to Step 3. 


IBM 2314 TAPE USERS 

IBM 2314 users with at least one tape unit available receive the 2314 
system on magnetic tape (see Figure 78 for distributions). This 
IBM-supplied tape is capable of restoring the 2314 system tc a 2316 disk 
pack. After the tape has been restored to the 2316 disk pack, the pack 
contains a core image, a relocatable, and a source statement library. 

Before generating a system, you should have at least one initialized 
disk pack (VTOC on cylinder 199). 


Step 1 

Mount the IBM-supplied magnetic tape and a disk pack tc which the tape is 
to be restored. 

Before restoring the tape, you mus t take the necessary action to perform 
or bypass the initialize disk routine. 

a. If the disk pack has not been initialized, the IBM-supplied volume, a 
self-loading tape, is capable of initializing the packs. Any volume 
serial number used in the EXTENT cards for the following steps must 
agree with the volume serial number in the VOL card fcr the initialize 
disk contrcl cards. 

If initialization is required, mount a pack cn unit 130. Mount the 
IBM-supplied tape on unit 280 (9-track drive). Place the following 
cards in the card reader. Dial unit 280 in the lead unit switches and 
press LOAD. When the system enters the wait state, press START and 
EOF on the card reader. The multipart forms of the linkage editor 
maps and the supervisor listing will be required by your IBM customer 
engineer fcr maintenance purposes. 


r- 1 

|// JOB INTDSK | 
|// DATE 72182 | 
| // ASSGN SYSLOG,X * OIF',Cl | 
|// ASSGN SYSOPT,X'130',D3 | 
| // EXEC | 
|// UID IA | 
|// VTOC STRTADR=(0199000),EXTENT=(20) | 
| VCL1111111 | 
I // END | 
L_J 


b. If the disk pack was previously initialized, the initialize disk 

routine can be bypassed. Any volume serial number used in the EXTENT 
cards for the following steps must agree with the volume serial numoer 
used when the packs were initialized. 

To bypass the initialize disk program on the IBM-supplied tape, 
mount the IEM-supplied tape on unit 280 (9-track drive), and mount an 
initialized disk on unit 130 (VTCC on CYL 199). Insert the following 
control cards in the reader. Dial unit 280 in load unit switches and 
press LOAD. When the system enters the wait state, press START and 
EOF on the card reader. The job is complete when the 00C and 4000A 
messages are logged. 
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j// JOB INTDSK 
[// DATE 72182 
j// ASSGN SYSLOG, X'OIF',Cl 
]// ASSGN SYSIPT,X'280',T2 
j// FILES SYSIPT,1 
L_J 


Step 2 


After step 1 is completed, you must restore the system frcm the 
self-loading tapes to the initialized pack. 


Do not rewind unit 280. To load the tape on disk, place the following 
cards in the reader. Dial unit 280 in the lead switches and press LOAD. 
When the system enters the wait state, press START and EOF on the card 
reader. See Re st or e the IBM-Supplied S ys tem Tape to Dis k for operating 
procedures. 


Note: If two tape units are available, assign the second tape unit for 2 

tape distribution to an alternate unit (SYS002). 


r-1 

|// JOB DISRST | 
|// DATE 72182 | 
|// ASSGN SYSO00,X'130',D3 | 
|// ASSGN SYSLOG,X'01F',Cl | 
j// ASSGN SYSLST,X'00E*,L1 | 
j// EXEC | 
L_J 


Step 3 

When the tape is restored, dial the address (unit 130) of the system 
residence disk drive into the lead unit switches, and IPL (press LOAD) to 
pass control to the DOS supervisor. See IPL c ont r ol a nd ASSGN Statem e nts 
for Syste m Ge ne ra tion, later in this module, for the IPL control 
statements. When the system enters the wait state, press START and ECF on 
the card reader. The following cards are in the card reader 
(SYSRDR/SYSIPT): 


r-1 

|ADD X'COC',3505 j 

|ADD X'00D',3525 | 

|ADD X*COE',3211 | 

|ADD X'01F’,1050A | 

|ADD X*130',2314 | 

|ADD X'280',3420T9 | 

|SET DATE=06/30/72 | 

|ASSGN SYSLOG,X'01F* | 

| LOG | 

jASSGN SYSRDR,X'00C* | 

|ASSGN SYSIPT,X'00C' | 

jASSGN SYSPCH,X * 00D* | 

jASSGN SYSLST,X'00E' | 

j ASSGN SYS001,X * 13 0' | 

|ASSGN SYS002,X'130* | 

|ASSGN SYS003,X*130' | 

jASSGN SYSLNK,X'13 0 * | 

j ASSGN SYSREC,X*13 0* | 

j SET RF=CREATE | 

l_J 
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Step 4 

Perform a sorted DSERV to display the directories. Then SSERV (display and 
punch) all the desired sample problems from the source statement library 
into cards. Punched output includes the sample problems with BKEND and 
CATALS cards. Four other books in the source statement library that should 
be punched out at this time (Z.LINKEDIT, Z.DELETECI, Z.DELETERL, and 
Z.EELETESL) contain the necessary control statements to selectively linkage 
edit and delete all IBM components. The sample problem pregram names, and 
the linkage edit and the delete book names can be chosen and punched into 
the DSPCH statement(s). 

r --| 

|// JOE DSERV | 

|// EXEC DSERV| 

| DSPLYS ALL j 

1 /* I 

j// EXEC SSERV| 

| DSPCH Z.ALL j 

|/* 1 
|/S | 

L_J 


Step 5 

Delete never-to-be-used components from the relocatable and source 
statement libraries. 


r - n 

j// JOB DELETE | 
|// EXEC MAINT | 
j DELETR (Unwanted Relocatable Library Components) | 
| DELETS (Unwanted Source Statement Library Components)| 

II 
|/& | 
L_J 


Step 6 

Define workfiles for SYSLNK, SYS001, SYS002, SYS003, and SYSREC. The 
workfiles SYSLNK, SYS001, SYS002, SYS003, and SYSREC are defined by use of 
the DLEL and EXTENT cards. These cards must be preceded by the OPTION 
STDLABEL or OPTION PARSTD card. 


|// JOE LABEL 
|// OPTION STDLABEL 

|// DLEL IJSYSLN,'SYSTEM WORK FILE NO. O',99/365,SD 

|// EXTENT SYSLNK,nnnnnn,1,n,nnnn,nnnn 

j// DLEL IJSYS01,'SYSTEM WORK FILE NO. 1',99/365,SD 

|// EXTENT SYS001,nnnnnn,l,n,nnnn,nnnn 

j// DLEL IJSYSO2,'SYSTEM WORK FILE NO. 2',99/365,SD 

|// EXTENT SYS002,nnnnnn,1,n,nnnn,nnnn 

|// DLEL IJSYSO3,'SYSTEM WORK FILE NO. 3 : ,99/365,SD 

|// EXTENT SYS003,nnnnnn,1,n,nnnn,nnnn 

|// DLBL IJSYSRC,'SYSTEM RECORDER FILE99/365,SD 

|// EXTENT SYSREC,nnnnnn,1,n,nnnn,nnnn 

j/6 
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Step 7 


Assemble the installation tailored supervisor. 


|// JOB SUPVR 

|// EXEC ASSEMBLY 

| SUPVR MPS=YES 

| CONFG MODEL=145,DEC=YES,FP=YES 

j STDJC LISTX=YES,LINES=46 

| FOPT IT=BG,PC=YES,OC=YES,CCHAIN=YES r DASEFP=(l,1,2314) , X 

| SYSFIL=YES,TEB=4,TOB=YES, ZONE= (WEST, 5) 

| PIOCS TAPE=9 

| ALLOC F1=14K,F2=14K 

I IOTAB JIB=10,FlPGR=8,F2FGR=8,IODEV=10,EGPGR=10,D2314=6.D3420=2 

j DVCGEN CHUN=X'00C,DVCTYP=3505 

| DVCGEN CHUN=X *00D *,DVCTYF=3525P 

| DVCGEN CHUN=X*COE',DVCTYP=3211 

I DVCGEN CHUN=X * OIF *,DVCTYP=1050A 

| DVCGEN CHUN=X’130',DVCTYP=2314 

| DVCGEN CHUN=X ' 28 0 * ,DVCTYF=342QT9 

| ASSGN SYSRDR,X'00C' 

| ASSGN SYSIPT,X'00C' 

| ASSGN SYSPCH,X'00D" 

| ASSGN SYSLST,X'00E' 

f ASSGN 3YSL0G,X'OIF’ 

I ASSGN SYSLNK,X 1 130' 

| ASSGN SYSREC, X'130' 

| ASSGN SYSQ01,X'130' 

| ASSGN SYS002,X'130' 

I ASSGN SYS003,X’130' 

j SEND 16384 

| END 
(/* 

j* CHECK ASSEMBLY LISTING FOR ERRORS. IF CORRECT 
j* REMOVE ASSEMBLED SUPERVISOR FROM SYSPCH. INSERT IN READER 
j* FOLLOWING THE INCLUDE CARD OF JOE CATALSUP 
|// PAUSE TO CONTINUE PRESS END 
! 


Not e: The operator needs to knew the address of label CNLSVE in order tc 

obtain a "special purpose dump". As he normally does not have access to 
the supervisor assembly listing, you should locate the address in this 
listing and ask him to write it down under the heading "special Purpose 
Dump" (Reference 10) in DOS Version 4 Message s, GC33-5009. 


Step 8 

Perform all other necessary assemblies. The ccmpcnent assemblies should be 
performed as separate jobs. For the information required tc assemble 
Emulator Programs, refer to the Emulatcr Program manual listed in the 
Preface. You must be careful tc keep all assemblies in order. Assemble 
all your required IOCS modules. By assigning SYSPCH to a tape unit, the 
IOCS modules can be cataloged tc the relocatable library without punching 
them on cards. The IOCS modules required by compilers, as defined in 
Module 4/ C ompiler IOCS Modules , are supplied in tne relocatable library by 
IBM. 


Close the tape assigned to SYSPCH and reassign SYSPCH tc its permanent 
assignment by using the CLOSE command. The assembly listings should be 
checked for errors before proceeding. 
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j// JOB ASSEM | 
j// OPTION DECK,LIST,LOG | 
j// ASSGN SYSPCH,X'280* | 
]// EXEC ASSEMELY j 
j CDMOD RECFORM=FIXUNB,CTLCHR=ASA,TYPEFLE=OUTPUT,IOAREA2=YES, X | 
j DEVICE=3525,SEPASMB=YES | 
| END I 
|/* | 
j// EXEC ASSEMBLY | 
| MTMOD RECFORM=FIXUNB,READ=FORWARD,CKPTREC=YES,SEPASMB=YES j 
| END | 

V* I 

jCLOSE SYSPCH,X'OOD* | 
|/& | 
j* CHECK ASSEMBLY LISTINGS FOR ERRORS. RELOAD 280 WITH SAME TAPE. | 
|// PAUSE IF CORRECT PRESS END TO CONTINUE. | 
l_J 


Step 9 

Linkage edit and catalog the assembled supervisor (object module from step 
7) to the core image library. If the SE ND address is larger than th e on e 
used by the supervisor being r eplaced, c e rtai n key progra m s must also be 
linkage edited and cataloged t o t he core ima ge library in the same job st ep 
with the new supervisor. The s e k ey prog r ams are the librarian program s 
CQRGZ, RSERV, and SSERV . The LINKEDIT deck punched out in step 4 contains 
all the necessary control statements to linkage edit all IEM components 
shipped on the system. If the SEND address is not exceeded, only the 
supervisor is cataloged. 


The new supervisor cannot be retrieved until after the /S is read . For 
any program being cataloged into the core image library (CIL), the system, 
places an entry in the CIL directory. In addition, for any program 
beginning with cne of the special prefixes $, $$A, $$B, $$EO, or FGP, the 
system also places an entry in the appropriate subdirectory (if space is 
available) after /S is read. The supervisor entry is placed in the 
transient (sub)directory even if it must overlay the last entry on the 
track. 


When retrieving one of these special prefix programs, the system first 
searches the appropriate subdirectory. If it does not find an entry for 
that program, the system then searches the CIL directory. Suppose, in this 
job, the supervisor is cataloged, but the job terminates before /& is 
reached. The CIL directory contains an entry fcr the ne w supervisor (and 
entries for the ether cataloged programs), but the transient directory 
still contains an entry for the old supervisor. If ycu IPL at this point, 
the system merely reloads the old supervisor. Tc recover frem this 
situation, rerun the job with at least one special prefix program and all 
the programs in the steps that were net successfully completed. Including 
the special prefix program causes the subdirectories tc he updated 
(rewritten). To re-link edit and catalog more than described here uses 
additional core image library space unnecessarily until a ccndense is 
performed. 


Do not attempt any other operations until the supervisor and the other 
programs in this job are cataloged, /& is reached, and the subsequent IPL 
is performed. 

Note : It may be necessary to reallocate because cf the size of the 

programs (components) desired in the various libraries. This may be 
accomplished by using the ALLOC statement of either the MAINT or CORGZ 
librarian programs. 


146 DOS Version 4 System Generation 









1 


|// JOE CATALSUP | 

|// OPTION CATAL | 

| ACTION CLEAR | 

| INCLUDE | 

| Supervisor object deck here. | 

I /+ I 

|// EXEC LNKEDT 1 

I INCLUDE IJBSL3 RSERV | 

|// EXEC LNKEDT | 

I INCLUDE IJBSL4 SSERV | 

|// EXEC LNKEDT | 

| INCLUDE IJBSL5 CORGZ | 

|// EXEC LNKEDT | 

1 PHASE LSERV, S or +0 (Note) | 

| INCLUDE IJBLSERV | 

|// EXEC LNKEDT | 

|/6 | 

I i 

t Note : S is required for a non-MPS system 

j and +0 for an MPS systeir. | 

L-J 


Step 10 

Re-IPL and issue the SET statement. 


Linkage edit and catalog any additional components desired to the core 
image library. See the appropriate module fcr each component fcr a 
complete list of control cards for the components to be cataloged. Before 
the next step is performed, perfcrir an LSERV tc display the label cylinder, 
check the linkage editor listings, and make all necessary corrections. 


r-1 

| SET | 

|// JOB CATALCLB | 

|// OPTION CATAL | 

|* AT THIS POINT LINKAGE EDIT DESIRED COMPONENTS | 
|// EXEC LNKEDT | 

|/* | 

|/6 i 

L-J 


Step 11 

Reload the tape that was assigned tc SYSPCH in step 8 and assign it to 
SYSIPT. With this tape the MAINT program catalogs the IOCS modules to the 
relocatable library by the contrcl card // EXEC MAINT. 
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r - 

|// JOB CATALRLB 
j// ASSGN SYSIPT,X'280* 

|* CATALOG MODULES TO RELOCATABIE LIBRARY 
|// EXEC MAINT 

I / + 

|* THE FOLLOWING DELETIONS ARE OPTIONAL. 

\// PAUSE PLACE REMAINING CARDS IN READER. PRESS EOB TO CONTINUE| 

I// EXEC MAINT j 

I ' I 

|Place any desired deletes here. | 

j CONDS RL,SL | 

{/* | 

|/g | 

|// PAUSE EOJ SYSGEN | 

l_J 

The basic SYSGEN is complete. Ycu may set new standard labels, 

re-allocate library sizes by using the copy function (CORGZ) and set 
automatic condense limits if required. The recorder file (IJSYSRC) should 
then be created again. See Re corder Fil e (SY S REC) . Copy the operational 
pack for backup. 
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IBM 3330 Disk Storage Example 


Figure 1-25 illustrates the general procedure tc he followed by users with 
a 3330 which is to be used as the system residence volume. 




Figure 1-25 PROCEDURES—Overview of a 3330 System Generation 


This example is one of the many possible methods for generating a system. 
Figure 1-26 illustrates the system configuration upon which the 3330 
example is based. 
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INPUT/OUTPUT DEVICE CONFIGURATION FCR 3330 EXAMPLE (FIGURE 1-26) 


Device 

Channel 

Unit 

Use 

254 OR 

0 

OC 

Card Reader (SYSRDR, SYSIPT) 

2540P 

0 

0D 

Card Punch (SYSPCH) 

3211 

0 

0E 

Printer (SYSLST) 

3210/3215 

0 

IF 

Console Printer-Keyboard (SYSLCG) 

3330 

2 

60 

Disk (SYSRES, SYSLNK, SYSREC, SYS001 
SYS002, SYS 003, SYS004) 

2400T9 

1 

80 

Magnetic Tape 


3330 EXAMPLE: RESULTS OF SYSTEM GENERATION 

When system generation is completed, the operational disk cf the 
installation contains user selected components and programs in its core 
image library, together with the installation's tailored supervisor, jet 
control, linkage editor,, and librarian programs. The tape shipped by IBM 
is retained as backup tape. It is a self-loading tape capable of being 
restored on disk. The sample problems are punched out during step 4. 
Libraries contain all modules and iracrc definitions shipped from IBM. The 
core image library is built to contain those IBM programs chosen. 

The libraries are condensed, and IOCS modules are assembled and 
cataloged to the relocatable library. When system generation is completed, 
the sample problems should be run against the operational pack to ensure 
correct creation of all system programs. 



Channel 1 


Unit X'180' 


IBM System/370 Model 145 


Optional Features 
Floating Point 
Decimal 


Channel 2 


Channel 0 


3330 


Unit X'260' 

SYSRES 

SYSLNK 

SYS001 

SYS002 

SYS003 

SYS004 

SYSREC 


Unit X'OIF 1 


SYSLOG 


Unit X'OOE' 


Unit X'OOC’ 


Unit X'OOD' 




_i_ 

3211 


- - 

2540R 


/-- 

2540P 

oZ i U/oz 1 








SYSLST 


SYSRDR 

SYSIPT 


SYSPCH 


Figure 1-26 PROCEDURES—System configuration fer 3330 example 
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3330 SYSTEM GENERATION PROCEDURES 


IEM 3330 users receive the 3330 system on magnetic tape (see Figure 1-25 
for distributions). This IBM-supplied tape is capable of restoring the 
3330 system to a 3336 disk pack. After the tape has been restored to the 
3336 disk pack, the pack contains a cere image, a relocatable, and a source 
statement library. 


Eefore generating a system, you should have at least one initialized 
disk pack (VTOC on cylinder 403). 


Step 1 

Mount the IEM-supplied magnetic tape and a disk pack to which the tape is 
to be restored. 

Before restoring the tape, you mus t take the necessary action to perform 
or to bypass the initialize disk routine. 

a. If the disk pack has not been initialized, the IBM-supplied volume, a 
self-lcading tape, is capable of initializing the packs. The volume 
serial number used in the EXTENT cards for the following steps must 
agree with the volume serial number of the disk pack. 

If initialization is required, mount a pack on unit 260. Mount the 
IBM-supplied tape on unit 180 (9-track drive). Place the following 
cards in the card reader. Eial unit 180 in the load unit switches and 
press LOAD. When the system enters the wait state, press START and EOF 
on the card reader. The multipart forms of the linkage editor maps and 
the supervisor listing will be required by ycur IBM customer engineer 
for maintenance purposes. 


r - n 

j// JOB INTDISK | 

j// DATE 72182 | 

j// ASSGN SYSLOG,X'01F *,C1 | 

j// ASSGN SYSOPT,X* 260*,D4 | 

j// EXEC | 

|// UID IQ | 

j// VTOC STRTADR=(0403000),EXTENT=(19)| 
j VCL1111111 | 

|// END | 

L_J 


b. If the disk pack was previously initialized, the initialize disk 

routine can be bypassed. Any volume serial number used in the EXTENT 
cards for the following steps must agree with the volume serial number 
used when the packs were initialized. 

To bypass the initialize disk program on the IBM-supplied tape, 
mount the IBM-supplied tape on unit 180 (9-track drive), and mount an 
initialized disk on unit 260 (VTOC on CYL 403). Insert the following 
control cards in the reader. Dial unit 180 in the lead unit switches 
and press LOAD. When the system enters the wait state, press START and 
EOF on the card reader. The jcb is complete when the 00C and 4000A 
messages are logged. 


r - 

|// JOB INTDSK | 

j// DATE 72182 | 

|// ASSGN SYSLOG,X'01F',Cl | 
j// ASSGN SYSIPT,X'180',T2 | 
|// FILES SYSIPT,1 | 

L_j 
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Step 2 

After step 1 is completed, you irust restore the systerr frcir the 
self-loading tapes to the initialized pack. 

Do not rewind unit 180. To lead the tape cn disk, place the following 
cards in the reader. Dial unit 180 in the load switches and press LOAD. 
When the system enters the wait state, press START and EOF cn the card 
reader. See Restor e the IB M- supplied System T ape to Disk for operating 
procedures. 

Not e: If two tape units are available, assign the second tape unit for 2 

tape distribution to an alternate unit (SYS002). 

r-1 

|// JOB DISRST | 

|// BATE 72182 | 

|// ASSGN SYSOOO,X’260',D4 | 

|// ASSGN SYSLOG,X* OIF',Cl | 

|// ASSGN SYSLST,X'OOE',Ll | 

]// EXEC | 

L_J 


Step 3 

When the tape is restored, dial the address (unit 260) cf the system 
residence disk drive into the load unit switches and IPL (press LOAD) to 
pass control to the DOS supervisor. See IPL Control an d A SSGN S t ate m ent s 
f or Sys t em Ge ne ra t ion , later in this module, for the IPL control 
statements. When the system enters the wait state, press START and EOF cn 
the card reader. The following cards are in the card reader 
(SYSRDR/SYSIPT): 


r- 

| ADD X'OOC',2b40R | 

(ADD X'COD', 254OP j 

jADD X'00E',3211 | 

| ADD X'C1F',10 50A \ 

| ADD X'260',3330 | 

| ADD X'180',2400T9 | 

| SET DATE=06/3 0/72 | 

| ASSGN SYSLOG,X'01F' | 
| LCG | 

| ASSGN SYSRDR,X'OOC' | 
| ASSGN SYSIPT,X'OOC' | 
| ASSGN SYSPCH,X'00D' 1 
| ASSGN SYSLST,X'00E' | 
| ASSGN SYS001,X'26C j 
j ASSGN SYS002,X'260' j 
| ASSGN SYS003,X'26 0'j 
| ASSGN SYSLNK,X'260* | 
I ASSGN SYSREC,X'26 0' | 
jSET RE=CREATE | 

l_J 


Step 4 

Perform a sorted DSERV to display the directories. Then SSERV (display and 
punch) all the desired sample problems from the source statement library 
into cards. Punched output includes the sample problems with BKEND and 
CATALS cards. Four other books in the source statement library that should 
be punched out at this time (Z.LINKEDIT, Z.DELETECI, Z.DEIETERL, and 
Z.DELETESL) contain the necessary control statements to selectively linkage 
edit and delete all IBM components. The sample problem program names, and 
the linkage edit and the delete took names can be chosen and punched into 
the DSPCH statement(s). 
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r- 

J// JOE DSERV 
j// EXEC DSERV 
|DSPLYS ALL 

l/* 

|// EXEC SSERV 
j DSPCH Z. ALL 

|/* 

|/6 

L__J 


Step 5 

Delete components you will never use from the relocatable and source 
statement libraries. 


r-1 

|// JOB DELETE | 

|// EXEC MAINT | 

IDELETR (Unwanted Relocatable Library Coirpcnents) | 

|DELETS (Unwanted Source Statement Library Components) j 

|/* | 

|/S | 

L_J 


Step 6 

Define work files for SYSLNK, SYSREC, SYS001, SYS002, and SYS003. The 
workfiles SYSLNK, SYSREC, SYS001, SYS002, and SYS003 are defined by use of 
the DLBL and EXTENT cards. These cards must be preceded by the OPTION 
STBLAEEL or OPTION PARSTD card. 


r-1 

|// OPTION STDLAEEL | 

|// DLBL IJSYSLN,'SYSTEM WORK FILE NO. O',99/365,SE | 
|// EXTENT SYSLNK,nnnnnn,1,nnnnn,nnnn | 

[// DLBL IJSYS01,'SYSTEM WORK FILE NC. 1',99/365,SE | 
j// EXTENT SYS001,nnnnnn,1,nnnnn,nnnn | 

j// DLBL IJSYS02,'SYSTEM WORK FILE NC. 2',99/365,SE | 
|// EXTENT SYS002,nnnnnn,1,nnnnn,nnnn | 

|// DLBL IJSYS03,'SYSTEM WORK FILE NC. 3',99/365,SE | 
j// EXTENT SYSO03,nnnnnn,1,nnnnn,nnnn | 

|// DLBL IJSYSRC,'DCS RECORDER FILE',99/365,SD | 

|// EXTENT SYSREC,nnnnnn,1,nnnnn,nnnn | 

L_J 
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Step 7 

Assemble the installation tailored supervisor (see Note). 


// JOE SUPVR 
// EXEC ASSEMBLY 

SUPVR MPS=YES 

CONFG MODEL=145,DEC=YES, FF=YES 
STDJC LISTX=YES,LINES=46 

FOPT IT=BG,PC=YES,OC=YES,CCHAIN=YES,DASEFP=(2,2, 3330), X 

SYSFIL=YES,TOD=YES f ZONE=(WEST,5) 

PIOCS TAPE=9,DISK=3330 
ALLOC Fl=14K,F2=14K 

IOTAB JIB=10,F1PGR=8,F2PGR=8,IODEV=10,EGPGR=10,E3330=2,D2400=l 

EVCGEN CHUN=X' OOC' , DVC C IYP=2540R 

DVCGEN CHUN=X'00D',DVCTYP=2540P 

DVCGEN CHUN=X'00E',DVCLYP=3211 

DVCGEN CHUN=X'OIF *,DVCTYF=1050A 

DVCGEN CHUN=X'180',DVCTYP=24OOT9 

DVCGEN CHUN=X'260',DVCTYF=3330 

DVCGEN CHUN=X*261',DVCTYP=3330 

ASSGN SYSRDR, X' OOC ' 

ASSGN SYSIPT,X*OOC' 

ASSGN SYSPCH,X'00D' 

ASSGN SYSLST,X'00E' 

ASSGN SYSLOG,X 1 OIF' 

ASSGN SYSLNK,X'260' 

ASSGN SYSOOl^^eO' 

ASSGN SYS002,X'260' 

ASSGN SYSC03 r X'260’ 

ASSGN SYSREC,X'260' 

SEND 16384 

END 

/* 

* CHECK ASSEMELY LISTING FOR ERRORS. IF CORRECT 

* REMOVE ASSEMBLED SUPERVISOR FROM SYSPCH. INSERT IN READER 

* FOLLOWING THE INCLUDE CARD CF JCB CATALSUP 
// PAUSE TO CONTINUE PRESS END 

/& 


Not e: The operator needs to kncvi the address cf label CNLSVE in order tc 

obtain a "special purpose dump". As he normally dees net have access to 
the supervisor assembly listing, you should locate the address in this 
listing and ask him to write it down under the heading "special Purpose 
Duirp" (Reference 10) in D OS Versi on 4 Me s sage s, GC33-5009. 


Step 8 

Perform all other necessary assemblies. The ccirpcnent assemblies should be 
performed as separate jobs. For the information required tc assemble 
Emulator Programs, refer to the E mulator Program manuals listed in the 
Preface. You must be careful tc keep all assemblies in order. Assemble 
all your required IOCS modules. By assigning SYSPCH to a tape unit, the 
IOCS modules can be cataloged tc the relocatable library without punching 
them in cards. The IOCS modules required by compilers, as defined in 
Module 4, Compi ler IOCS Modules , are supplied in the relocatable library by 
IBM. 

Close the tape assigned to SYSPCH and reassign SYSPCH tc its permanent 
assignment by using the CLOSE command. The assembly listings should be 
checked for errors before proceeding. 
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r-1 

|// JOB ASSEM | 

|// OPTION DECK,LIST,LOG j 

j// ASSGN SYSPCH,X'180' j 

j// EXEC ASSEMELY j 

j CDMOD RECFORM=FIXUNB,CTLCHR=ASA,TYEEFLE=OUTFUT,IOAREA2=YES, X | 

| DEVICE=2 540,SEPASMB=YES j 

| END j 

I /+ I 

| CLOSE SYSPCH,X *00D' | 

J/6 j 

I* CHECK ASSEMBLY LISTINGS FOR ERRCFS. RELOAD 180 WITH SAME TAPE. 1 

j// PAUSE IF CORRECT PRESS END TO CONTINUE. | 

L-J 


Step 9 

Linkage edit and catalog the assembled supervisor (object module from step 
7) to the core image library. If the S END add res s is l ar g er th a n th e cne 
use d by t he s up er vi sor being replaced , certain ke y pr ogram s mus t als o b e 
linkage edite d and catal oged tc the c or e image l ib rary in t he sa m e j ob step 

with th e new sup ervisor. _These key p rograms are the li br a rian p r ogr ams 

C ORGZ, RS ERV, and SSERV . The IINKEDIT deck punched out in step 4 contains 
all the necessary control statements to linkage edit all IBM components 
shipped on the system. If the SENE address is not exceeded, only the 
supervisor is cataloged. T he new s up e rv is or i s ne t c atal c ged until a /& 
sta te ment is rea d. Do not attempt any other operation from the time the 
supervisor and these preceding programs are cataloged until IPL time. 


Not e: It may be necessary to reallocate because of the size of the 

programs (components) desired in the various libraries. This may be 
accomplished by using the ALLOC statement cf either the MAIKT or CORGZ 
librarian programs. 


r - 1 

|// JOB CATALSUP | 
j// OPTION CATAL | 
j ACTION CLEAR | 
j INCLUDE | 
j Supervisor object deck here.) 


\/* | 

|// EXEC LNKEDT | 

j INCLUDE IJBSL3 RSERV j 

j// EXEC LNKEDT | 

| INCLUDE IJBSL4 SSERV | 

j// EXEC LNKEDT 1 

j INCLUDE IJESL5 CORGZ | 

j// EXEC LNKEDT 1 

j/6 | 

L_J 


Step 10 

Re-IPL and issue the SET statement with the applicable parameters (see IPL 
control statements). 

Linkage edit and catalog any additional ccmpcnerts desired tc the cere 
image library. See the appropriate module for each component for a 
complete list of control cards fer the components to be cataloged. Before 
the next step is performed, check the linkage editor listings, and make all 
necessary corrections. 
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| SET | 
|// JOB CATALCLB | 
|// OPTION CATAL | 
|* AT THIS POINT LINKAGE EDIT DESIRED COMPONENTS | 
|// EXEC LNKEDT | 

I /* I 
|/& | 
L_J 


Step 11 

Reload the tape that was assigned tc SYSPCH in step 7 and assign it to 
SYSIPT- With this tape the MAINT program catalogs the IOCS modules to the 
relocatable library by the contrcl card // EXEC MAINT. 


r-1 

|// JOB CATALRLB | 
|// ASSGN SYSIPT # X'180* | 
| * CATALOG MODULES TO RELOCATABLE LIBPARY | 
j// EXEC MAINT | 
\/* | 
|* THE FOLLOWING DELETIONS ARE OPTIONAL. j 
|// PAUSE PLACE REMAINING CARDS IN READER. PRESS END TO CONTINUE| 
[// EXEC MAINT | 
|Place any desired deletes here. j 
| CONDS RL # SL | 
|/* | 
|/& | 
|// PAUSE EOJ SYSGEN | 
L_J 


The basic SYSGEN is complete. Ycu may set new standard labels, 
re-allocate library sizes by using the copy function CCGRGZ) and set 
automatic condense limits if required. Copy the operational pack fcr 
backup. 
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IPL Control and ASSGN Statements for System Generation 


The forirats for the ADD and SET statements are given in this section. 

These statements are used at IPL time. If standard physical unit 
description and assignments are made when assembling the supervisor and if 
these correspond to the configuration used when the system was generated, 
no ADD or ASSGN statements are required during subsequent IPL procedures. 
The SET statement is always required. 


ADC (ADD A DEVICE) 


Operation 

" T 

1 

- 4- - 

Operand 

ADD 

T 

1 

- I . 

X'cuu't(k)J,devicetype [,X *ss *] 


The entries in the operand field represent the following: 
X 1 c uu * 

Channel and unit numbers. 


(k l 

Specify k=S if the device is switchable (the device is physically attached 
to two adjacent channels). The designated channel is the lower of the two 
channels. If the device is not switchable, specify k=0-255. This 
indicates the priority on the channel of the device, with 0 the highest 
priority. 


^evicetype 

Actual device (2311, 2400T9, 1443, etc). See Figure 1-5. 

Notep Teleprocessing (TP) devices cannot be added if TP=NO in the SUPVR 
macro. 


X' s s* 

Device specifications: If absent for 7- or 9-track tapes, X'90' or X'CO* 
is assumed. (See A SSGN statement fcr the proper entries.) 

The device specifications fcr an IBW 2702 Transmission Control Unit are: 

X'00' for SADO X'02' for SAD2 
X'01* for SADI X * 03' for SAD3 

The device specification for a 1053 attached tc a 2848 is: X'01'. 

If the device type is omitted for a 2702 Transmission Control Unit, 

X'OO’ is assumed. 

The device specifications for a 1018 are: 

X'00' for a 1018 without the error-correction feature. 

X'01' for a 1018 with the errcr-ccrrection feature. 
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1419/1255/1259/1270/1275 

The device specification designates the external interrupt bit 
associated with magnetic ink character readers or optical 
reader/sorters. The mode X f 01' through X'20* ccrrespcnds to external 
interrupt PSWs bits 26 through 31, respectively. For dual address 
adapter 1419, this parameter is needed for both 1419P and 1419S. 

X'01* Device attached to external line 7. 

X*02* Device attached to external line 6. 

X'04' Device attached to external line 5. 

X'08' Device attached to external line 4. 

X’10* Device attached to external line 3. 

X'20' Device attached to external line 2. 


SET ( SET THE D ATE AND TIME) 


| Operation | Operand | 

|- - + -- ( 

| SET | [DATE=valuel [ ,CLGCK=value2 3 ] [ , ZONE=/EAST\/hh/mm] | 

I I (WEST/ | 


Depending on the message displayed cn the conscle printer-keyboard, after 
the REQUEST button has been pressed, this statement can be specified 

without operands, with DATE operand only, with EATE and/cr CLOCK operands 

only, with ZONE operand only, or with all operands. 

valuel Specifies the year, mcnth, and day of the ircnth in cne of the 
following formats: 

mm/dd/yy 

dd/mm/yy 

value2 Specifies the time-of-day in the format hh/mm/ss, where hh is 

hours, mm is minutes, and ss is seconds. 

EAST Specifies that the installation is located at a geographical 

position to the east of the meridian of Greenwich, Great Britain. 

WEST Specifies that the installation is located at a geographical 

position to the west of the meridian of Greenwich, Great Britain. 

hh A decimal value in the range 0-12, indicating the difference in 

hours between local time and Greenwich Mean Time. 

mm A decimal value in the range 0-59. This value indicates the 

minutes portion of the difference between local time and Greenwich 
Mean Time. 

The parameters that have to fce specified with the SET statement depend 
upon the type of system and the type of communications device used. The 
following combinations can be distinguished: 

1 * 3 210/ 3215 con so le printer -keyboard; s ystem withou t support for either 

TO D clock . Job Accounting, or QTAM. 

The statement should be given in the form SET DATE=valuel. CLOCK and 
ZONE may be specified but are ignored (message 0I31A is printed). 

2. 3 210/3215 con so le print er- keybo a rd; s ys tem w ithou t TOD clock support , 

b ut with support for eith e r J ob Acc ou nt in g o r QTA M. 

The statement must be given in the form SET EATE=valuel,CLOCK=value2. 
ZONE may be specified but is ignored (message GI31A is printed). 
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3• 3210/321h con s ole printer - keyboard; sy ste m w i th TOD clock support . 

If the TOD clock is in the set state (iressage 0I30I is printed), the 
statement may be given in any of the five possible forms, depending on 
whether the values are satisfactory or net. 

If the TCD clock is in the not-set state (message 0I31A is printed), 
the statement must be given in either cf twe forms 

1. SET DATE=valuel,CL0CK=value2 , or 

2. SET with all three parameters. 

If the TOE clock is inoperative (message 0I32I is printed), perform 
the procedure as required fer systems without TOD clock support (see 
items 1 and 2 above). 

4. C ard Read er; s ystem without s u ppo r t f or e i ther TOD deck. Jo b 
A ccountin g , or QTAM . 

The statement must be given in the form SET DATE=valuel. 

5• Card Read er; s ystem witou t TOD c lo ck supp o rt, but with support fo r 
e ither Jo b Ac co unting or QTA M. 

The statement must be given in the form SET DATE=valuel,CL0CK=value2. 

6. Card Read er; s ystem with TOD clock suppor t. 

The SET statement may, in principle, be given without parameters. 
However, if the clock is in the 'net set' cr 'errer' state, the system 
enters the wait state with a message of 0I31A in low main storage; the 
IPL procedure must be performed again and the SET statement must be 
given with DATE and CLOCK or with all three parameters. 

If the clock is not operational (the system enters a hard wait state 
and message code 0I32A is placed in low main storage) the IPL procedure 
cannot be performed from a card reader. In that case the system must 
be loaded using a 3210 or 3215 console printer-keyboard. 

N ote 1: The date and time-of-day supplied in the SET statement for systems 
with TOE clock support must be realistic values; the time-of-day clock must 
always contain the exact time (that is the time that has elapsed since 
January 1, 1900, 00.00 hours). 

Note 2: If the SET statement contains DATE and CLOCK parameters and the 
system has TOD clock support, the operator must depress the TOD clock 
switch on the system control panel to the ENABLE SET position at the exact 
time he specified in the CLOCK parameter. 
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ASSGN (ASSIGN LOGICAL NAME) 


The ASSGN command assigns a logical input/cutput unit to a physical device. 


Operation 

—1 

1 

- 1 - 

Operand 


ASSGN 

T 

I 

SYSnnn,X'cuu' 

r,x • ss 


1 

_ I . 


|_» ALT J 


The entries in the operand field represent the following: 


SYSnnn 


The symbolic unit name. 


It may be cne of the following: 


SYSRDR SYSLNK 

SYSIPT SYSIN 

SYSPCH SYSOUT 

SYSLSr SYSCLB 

SYSLOG SYSRLB 


SYSSLB 

SYSREC 

SYS000-SYS221 (if MPS=EJF) 
SYS0G0-SYS243 (if MPS=NO or YES) 


rcuu^ 

Indicates the hexadecimal channel (c) and unit (uu) number. C=0 for the 
multiplexor channel. C=l-6 for selector channels 1-6. 


X * ss' 

Device specifications for 7- and 9-track tape are: 


SS 

Bytes 

Per 

Inch 

Parity 

Trans¬ 
late Convert 

Feature Feature 

10 

200 

odd 

off 

on 

20 

20C 

even 

off 

off 

28 

200 

even 

on 

off 

30 

200 

odd 

off 

cf f 

38 

200 

odd 

on 

off 

50 

556 

odd 

off 

on 

60 

55 6 

even 

off 

off 

68 

556 

even 

on 

off 

70 

556 

odd 

off 

off 

78 

556 

odd 

on 

off 

90 

800 

odd 

off 

on 

A0 

800 

even 

off 

off 

A8 

800 

even 

on 

off 

B0 

800 

odd 

off 

off 

B8 

800 

odd 

on 

off 

C 8 

80C 

9-track 

single 

density 

CO 

1600 

9-track 

dual density 

C8 

800 

9-track 

dual density 

CO 

1600 

9-track 

single 

density 


Not es: There are two possible device specifications for 9-track tape 

units: X'CO' and X'C8*. CO is the normal reset mode for the three 

kinds of 9-track tape units, namely: 

1. A tape unit capable of reading from and writing on 800 b.p.i. 
tape only; 

2. A tape unit capable of reading from and writing on 1600 b.p.i. 
tape on l y, an d 
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3. 


A tape unit capable of reading from and writing on bot h 800 and 
1600 b.p.i. tape. 

C8 is an alternate mode setting for type 3 units only, when tape with a 
density of 800 b.p.i. is used. 

When the system is generated, it is possible to make an explicit 
selection of mode setting for each iragnetic tape unit, or let the system 
take a standard action. If the latter action is chcsen, the system al wa ys 
assumes CO for the device. 

For a 9-track dual density output tape, the ASSGN density is compared 
with the VOLl density of the mounted tape. If a discrepancy is found, and 
if the tape is at load point, the volume label(s) is written according to 
the ASSGN density. 


ALT 

Alternate tape unit is used when the capacity of the original assignment is 
reached. 
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DOS System/370 Distribution Program and BPS Messages 

Supervisor Messages 



When a response is typed in 

on all actions, press Interrupt to 

continue. 

Message 

Cause 

Action 

0901 

Frogram Check 

No restart; take a 
storage print. Examine 
the program old PSW for 
error information. 

07 01 

Frcgrarr Check 


C7G2A 

The Console Printer Keyboard 
request key has been pressed. 

Type in 4 blank and pre; 
Interrupt to continue. 

Qcuu 

Device I/O error. The 
second character gives 
the channel number. The 
ethers give the unit 
information. 

Refer to Hardware Error 
Messages. 

Job Control Messages 



105CA 

104 0A 

Missing DATE card. 

Missing JOB card. 

Reload the program with 
corrected control cards 

111 C A 

Duplicate JOB card. 


120 0A 

Invalid card, i.e., 

// not in columns 

1 and 2 


122 OA 

Invalid or missing 
control card. 


13xxA 

Invalid field xx 
(field number). 


17C3A 

FAUSE card in deck. Should 
not occur because Utility 
programs dc net require 
or use a pause card. 

To continue, enter two 
blanks cn SYSLOG or pre 
the Interrupt key when 
the message is displaye 


on the console. 
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Initialize Disk Messages 


Message 

Cause 

Action 

CONTROL CARE ANALYSIS AND 
LABEL CHECKING 

Identifies beginning of 
initialize disk function. 

None. Processing continues. 

JOB CARD NOT INTDSK 

Job naire in job card is 
not INTDSK. 

Reload program with cor¬ 
rected ccntrcl cards. 

SYSCPT Nor DEFINED 

SYSOPT rrust be assigned. 


SYSOPT(002,C03 ,etc.) NOT 

A VALID DISK DRIVE 

Indicated syirbclic unit is net 
a disk drive in JCL syntax. 


X'cuu' NOT A VALID 

DISK DRIVE 

[PACK IS DELETED FROM 
FURTHER PROCESSING] 

Indicated disk drive not 

IBM supported, cr wrong 
'cuu'spec ification 

Reload program with cor¬ 
rected ccntrcl cards if 
ABNORMAL ECJ; otherwise 
no action required. 

UTILITY MODIFIER CARD 

Identifies the ccntrcl 
card parameters that 
follow this heading. 

Ncne. Processing 
continues. 

MISSING UTILITY MODIFIER 
CARE 

Utility irodifier card 
is missing. 

Reload pregram with cor¬ 
rected ccntrcl cards. 

INVALID CARD 

Utility modifier statement 
identified improperly. 


INVALID FORMAT 

Format is incorrect (either 
a parameter is missing 
cr it is out of erder) 


INVALID I (or C or R) 
PARAMETER 

Parameter value is incorrect. 


DISK TYPE SPECIFICATION 

FOR SYS002(003,004,or 005) 
IS NOT EQUAL SYSOPT. 

PACK IS DELETED FROM 

FURTHER PROCESSING 

Indicated symbolic unit 
differs freir SYSOPT type 
as specified in JCL syntax 

None. Processing continues 
without this unit being 
used. 

xxxx DISK TYPE ON X'cuu' 
WHILE yyyy IS EXPECTED 
(E.G. xxxx=2311 AND 
yyyy=3330) 

PACK IS DELETED FROM 

FURTHER PROCESSING 

Indicated disk drive 
differs from specification 
in jcb control language 
(JCL) 


NO VOLl LABEL (OR F4 LABEL 
OR VTOC AREA) FOUND ON 

X * CUU* . 'IS* OPTION 

INVALID 

Pack on indicated drive 
is tc be regarded as net 
being initialized, because 
no VGI1 label, F4 label cr 

VTOC was found. 

Reload pregram after 'xS' 
option in utility 
modifier card has been 
changed. 

NO VTOC MATCH FOUND 

ON X'CUU'. 'IS' OPTION 
INVALID 

Pack cn indicated drive 
is to be regarded as not 
being initialized, because 
device constants dc net 
match. 
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Message 

Cause 

Action 

SURFACE ANALYSIS AND 

HA-RO GENERATION 

Identifies the function 
of this phase (2311 and 

2314/2319 only). 

Ncne. Frccessing 
continues. 

NO SURFACE ANALYSIS, 

ONLY RO GENERATION 

Identifies the function 
of this phase for the 3330 
only. 

None. Processing 
continues. 

SYSOPT (002,CC3,etc.) 

Disk packs tc fce processed 
will te logged with 
their respective message, 
starting with SYSOPT. 


CYLxxx,TRKxx(DECIMAL ),IS 

A DEFECTIVE ALT TRK, NO 

ALT TRK ASSIGNED 

Cylinder and track are 
identified by decimal 
characters. The track on 
the alternate cylinder is 
defective. An alternate is 
not assigned. 


CYLXXX,TRKxx(DECIMAL), 

IS DEFECTIVE, AN ALT TRK 

IS ASSIGNED 

Main area of the track 
identified by cylinder 
and track number is defective. 

An alternate is assigned. 


CYLXXX,TRKxx,(DECIMAL) 

IS DEFECTIVE, AN ASSIGNED 
ALT TRK WAS DETECTED 

Main area of the track 
identified by cylinder and 
track number is defective. 

An alternate track had 
already been assigned 
(3330 only). 


CYLxx,TRKxx(DECIMAL), 

IS DEFECTIVE, ALT CYL IS 
FULL, NO ALT TRK ASSIGNED 
SYS XXX WILL BE DELETED 

AFTER PROCESSING IS 

FINISHED 

This defective track cannot 
be assigned an alternate 
track. The alternate 
cylinders are full. 

No correction procedure. 
Surface analysis (2311 and 
2314 only) and R0 genera¬ 
tion are performed on the 
rest of the pack; however, 
the pack will be deleted 
from further processing. 

CYLXX,TRKxx(DECIMAL) , 

HOME ADDRESS (HA) OR 

RECORD ZERO (RO) DEFECTIVE, 
SYSXXX WILL BE DELETED 

AFTER PROCESSING IS 

FINISHED 

Portion of the track where 
the heme address cr record 
zero resides is defective. 


CYLxxx,TRKxx,,(DECIMAL) 

IS DEFECTIVE, NO ASSIGNED 
ALT TRK WAS DETECTED 

SYSXXX WILL BE DELECTED 

AFTER PROCESSING IS 

Main area of the track 
identified by cylinder and 
track number is defective. 

No alternate track had teen 
assigned (3330 only). 



FINISHED 
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Message 

Cause 

Action 

♦VOL/VTOC LABELS CONTROL 
SET* 

Identifies sets of VOLl and 

VTOC cards. 

None. Processing 
continues. 

SYSOPT (002,003, etc.) 

Disk packs are identified with 
their respective messages, if 
any. 


SYSOPT (002,003,etc.) 
DELETED 

Identified disk pack is 
deleted from further 
processing. 


VTOC CARD MISSING OR 
INCORRECT. 

3LC1A 

INVALID VTOC ADDRESS 

OR INVALID EXTENT PARAMETER 
3LC 2A 

VTOC OVERFLOWS 

CYLINDER 

3LC 3A 

VTCC card is irissing cr 
is incorrect. 

Invalid VTCC start address 
or invalid (or missing) 

EXTENT parameter. 

Assigned VTOC area cverflcws 
the cylinder. 

1. Correct the cards in 
the volume label set 
(beginning with 

// VTCC card followed 
by VOLn cards). 

2. Place cards in the 
read hopper and ready 
the reader. 

VOLl CARD MISSING OR 

VOLIn OUT OF SEQUENCE 

3LC4A 

VOLl card is missing, an 
incorrect volume card was 
supplied, or VOLl through 

VOLn are out of sequence. 

3. Space SYSLOG until 

program takes control. 
Press interrupt key to 
continue. 

VOLl SERIAL FIELD 

CONTAINS BLANKS 

3LC 5A 

VOLl card has blanks in 
volume serial field. 


VTOC CARD OR END CARD 

OR VOL CARD ERROR 

Wrong VTOC or END control 
card, cr END card is missing. 


VTOC CARD SETS UNEQUAL 
NUMEER OF ASSIGNED PACKS 
3LC7A 

VTCC card sets and the number 
of assigned packs is not 
equal. 


PARAMETER DELMITER 

3LC8A 

Comma or blank must be after 
tha parameter. 


4404A 

No cutput-file format 4 label 
can be found. 

Type in 4 blank to ignore 
the error and press 
Interrupt to continue 
processing. Type in 

0 blank cr 1 blank to 
terminate the jot. 

UNEXPIRED FILE ON xxxx 

AT X*cuu'(filename 
from FI lafcel)". 

4444A 

(xxxx=2311,2314, or 3330) 

Identified file is net expired 
yet. 

a) Type in 4 blank and 
press Interrupt to 
delete file by file. 

b) Type in 2 blank to 
delete this and all 
other files. 



c) Type in 1 or 0 to 
terminate the job 
(wait state). 



d) Type in any digit other 
than 0, 1, 2, or 4 to 
delete this pack, and 
continue processing. 
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Restore Messages 


Messaqe 

Cause 

Action 

DISTRIBUTION PROGRAM 

Identifies the program. 

None. Processing 
continues. 

RESTORE FUNCTION 

Indicates that the 
restore mainline phase is 
in operation. 


TAPE READ ERROR 

3003 

ABNORMAL EOJ 

Tape error. 

None. Job is 
terminated . 

JOB NAME NOT DISRST 

3004 

ABNORMAL EOJ 

Job name in the jet 
card is incorrect. 


ALTERNATE DISK (TAPE) 
SPECIFICATION REJECTED. 
PROCESSING CONTINUED 

Assign card for SYS001 
(SYS002) in JCL in error. 

SYSOOO (SYSIPT) will new 
function as an alternate 
disk (tape). 

None. Processing 
continues. 

'FILE NAME' XXXXXX 

RECORDS RESTORED FOR 

ABOVE FILE 

3007 

XXXXXXis the number 
cf records restored 
frem tape to disk fer 
this file. 


END OF JOB 

3008 

End of job. 

None. Job is terminated. 

SYS0O0(OPT) AND SYS001 
(ALT.OPT) NOT EQUAL 

DISK TYPE 

3013 

ABNORMAL EOJ 

When processing multiple 
vclumes, one type cf disk 
storage is required for 
cutput and alternate 
output. 


SYS COO(or SYS001) NOT 
ASSIGNED TO A VALID DISK 
3016 

ABNORMAL EOJ 

SYSOOO or SYS001 must he 
assigned to a 2311, 2314/2319, 
cr 3330. 


A xxxx DISK FILE CANNOT BE 
RESTORED to A yyyy 

3026 

ABNORMAL EOJ 

The format of the tape file 
does net agree with the disk 
to be restored (e.g. xxxx=2314, 
yyyy=3330). 


END OF VOLUME SWITCHING 

TO ALTERNATE 

3677 

Cccurs at end cf tape 
volume when alternate drive 
has been assigned. 

None. Processing 
continues. 

END OF VOLUME ON SYSIPT 
READY NEXT REEL ON 

SYSIPT TAPE DRIVE 

3777A 

Cccurs at end cf tape 
volume when no alter¬ 
nate drive has been 
assigned. 

Ready next reel on SYSIPT 
and type in 2 blank, then 
press Interrupt to 
continue. 


Reply 0 or 1 to 
terminate; any other 
reply results in message 
code repetition. 
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Cause 


Action 


3993 SYSIST or SYSLCG net None. Jet is terminated. 

ABNORMAL EOJ assigned, or SYSLST 

and SYSLOG assigned to 
the same device. 


NO VOL1 LABEL ON SYSOOO Disk pack has no VCLl 

(or SYS001) label. 

4306A 


file name THIS FILE FOR Identifies the file 

SYSOOO to be restored. 

SYS001 


4307A 


SWITCHING TO SYSOOO Designates the drive, 

SYS001 SYSOOO or SYS001, to which 

43C8A the volume is tc be restored. 


DISK WRITE ERROR Disk error 

4311A 


Replace pack and type in 
2 blank, then press 
Interrupt to continue; 
type in any digit other 
than 0 or 1, followed by 
a blank, tc terminate. 

Any other reply results 
in message code 
repetition. 

Type in 2 blank and press 
Interrupt to restore this 
file. Type in 4 to 
bypass this file and 
continue processing 
with the next file. Type 
in 0 or 1 to terminate. 
Any ether reply results 
in message code 
repetition % For the 
single drive user, 

SYSOOO, and SYS001, refer 
to the same drive. 

Assure that an 
initialized pack is 
mounted on the designated 
drive. Type in 2 blank 
and press Interrupt to 
restore the volume. Type 
in 0 or 1 to terminate 
the job. Any other reply- 
results in message code 
repetition. For the 
single-drive user, 

SYSOOO, and SYS001, refer 
to the same drive. 

Replace pack and type in 
2 blank to continue; type 
in 0 or 1, followed by a 
nlank, tc terminate. 
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Cause 


Action 


M ess age 


4400A 

ABNORMAL EOJ 
4404A 

ABNORMAL EGJ 
4409A 

ABNORMAL ECJ 
441CA 

ABNORMAL EGJ 


4414A 

ABNORMAL EOJ 


4419A 

ABNORMAL EOJ 


VTOC NOT ON CYL 199(OR 403) 
4428 

ABNORMAL ECJ 


UNEXPIRED FILE ON SYS000 
(OR SYS001) AT X'cuu': 

"(filename)" 

4444A 


No available space in None. Jcb is terminated. 

VTCC . 

No output-file format 4 
label can be found. 

No cutput-file fcrrrat 1 
label can be found. 

Data check occurred while 
reading output-file count 
field. 

Error occurred while reading 
cutput-file format 4 
label. 

Read error occurred while 
searching the output-file 
VTOC. 

a) VTCC not on cylinder 199 None. Job is terminated, 

for a 2311, or 2314/2319 

b) VTOC not on cylinder 403 
for a 3330. 


Extent limits cf a file 
being restored overlap 
the identified unexpired 
file on the output disk pack. 


a) Type in 4 blank and 
press Interrupt tc 
delete file by file. 

b) Type in 2 blank to 
delete this and all 
ether files. 

c) Type in 0 or 1 to 
terminate the joc. 
Any ether reply 
results in message 
code repetition. 
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Hardware Error Messages 


No message is given, machine is in wait loop; registers A and B or instruction counter 
contains FFFF. (Note: All storage locaticns given are in hexadecimal.) 

P rogram : Any. 

M eaning : Byte 32 contains cne cf four error cedes. These codes are shown with their 

respective operator actions in the following text. There is no restart option provided 
for these codes. IPL must be used. 

00 - Machine check. Diagnostic information is in the diagnostic scan-cut area, starting 
in byte 80. Use the storage print utility program to obtain a storage printout for 
the programmer. 

OF - Channel error. Record the contents of the CSW, bytes 40-47; and the I/O Old PSW, 
bytes 38-3F. 

IF - Unit check. The CSW has the original information. Sense information is in bytes 

18-ID. Use the storage print utility program to obtain a storage printout, for the 
programmer. 

3F - Device not operational. Program is addressing a nonexistent device. This device is 
identified in bytes 38-3F. If the device dees exist, use the storage print utility 
program to obtain a storage printout fer the programmer. 


F irst Part o f Three-Part PIQCS M es sa g e—channel and Unit Address 



Ocuu |Part 1 of 3 parts. This part tells |Ncne. The second part of the message 


|the channel and unit address of a |is printed following the first part, 

junit on which an I/C error has | 

joccurred. The second digit (c) of | 
jthis part of the message identifies | 
jthe channel, and the last two | 

|digits (uu) identify the unit. | 

j._ j._ 
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Second Par t of Three-Pa rt PIQCS Me ssage - Status and Operation Code 






r 

(Operator 
-1 reply; 

(type in: 

i 

! 

r t 

|Message|Meaning 

L _L 

T 

|Action 


r 

T 

4" 


T 

1 

| nnnn 

j Part .2 of 3 parts. This 

(The first 2 digits of the| 



(part tells the status 

(status 

are supplied by 

1 



jand operation code in- 

(either 

the device or the 

1 



j formation. 

(device 

control unit. 

1 



h- 

-H 


! 



|The meanings of the 

I 


1 



|first diqit are: 

1 


I 

i 


I- 

—f 


! 



|0nnn - None (examine 

! 


1 



j the remaining 

1 


1 



i characters). 

I 

i 

J 


1 



1 

|lnnn - Device or con- 

i 

1 


I 

1 



j trol unit busy. 

I 

1 

i 


1 

1 



1 

|2nnn - Control unit end. 

l 

i 


1 

1 



1 

|4nnn - Status modifier, 
i 

1 

1 

i 


1 

1 



i 

|8nnn - Attention. 

1 

1 


1 

i 



j. - — 

—1 


1 



(The meanings of the 

1 


1 



(second diqit are: 

1 


I 



i - 

—f 


! 



|n0nn - None (examine 

l 


1 



j the remaining 

1 


1 



1 characters). 

1 


1 



|nlnn - Unit exception. 

1 


i 



jn2nn - Unit check. 

1 


1 



jn4nn - Device end. 

1 


1 



jn8nn - Channel end. 

1 


1 



jn6nn - Unit check at 

|Ignore 

the error and 

|4 blank or 



j device end, last 

(continue processing. 

(5 blank 



j item of output 

1 





j may be in error. 

I 


1 



j There is a non- 

1 


I 



j recoverable error 

i 


1 



( present, regardless 

1 


1 



j of the information 

1 


1 



j in the third part 

1 


1 



j (sense) of the 

1 


1 



j message. 

1 


1 



|The last two digits con- 

1 


1 



j stitute the operation 

1 


1 



j code of the last CCW ex- 

1 


1 



jecuted. An exception to 

1 


1 



(this is that on a DVC END 

1 


1 



j error, the operation cede 

1 


1 



(digits are set to zero. 

1 


1 


L 

- X 



x 

.j 
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T hird par t cf T hree-Par t P IC C S Me ssag e-Se n se Informat ion 


r t 

|Messagej Meaning 
l r 

r~ ~ — 

| Operator 

- T --{reply: 

|Action |type in: 

— 1 

_ J 

j 

T 

1 

1 t 

i i 

1 

| nnnnA 

1 

|Part 3 of 3 parts. This 

i 

|None. The third part 




jpart tells the sense bit 

|of the message is 




jinfcrmation. The charac- 

|printed following the 




jters in this part cf the 

[second part. 




|message indicate sense 





j bits set by the device 

1 




|control unit. The mean- 





jings of these sense bits 

1 




jare found in the SRL pub- 

1 




jlication for the partic- 





jular device. 

1 




h 

--1 




|The meanings of the 

1 




!first diqit are: 

1 





—1 




|OnnnA - None (examine the 





j remaining charac- 

1 




j ters). 





I 

|Either 




|InnnA - Equipment check 

|igncre the error, and 

4 



1 

i 

|continue processing, or 

blank 



1 

1 

I 

|Examine the device for 

5 



1 

| 

|trouble, then retry. 

I 

blank 



i 

|2nnnA - Parity error cn 

1 

|Either ignore the error 

4 



} channel. 

|and continue processing. 

blank 



1 

I ° r 

I 




1 

1 

|Reply tc retry the 

5 



1 

l 

|operation. 

blank 



1 

|4nnnA - Intervention 

|Either ignore the error 

4 



| required. 

|and continue processing. 

blank 



1 

| or 

i 




1 

1 

|Ready the device, then 

5 



1 

i 

|reply tc retry. 

I 

blank 



1 

|SnnnA - Command reject 

1 

| Ignore the error and 

4 



j (invalid, missing. 

(continue processing; 

blank 



j or incorrect 

| (if the device was a 




1 command). 

|printer, and a print or 




1 

|sync check occurred after 




1 

|channel end, a retry of 




1 

|the same line is net 




1 

|permitted); or 

i 




1 

1 

|Reply to retry the 

5 



1 

1 

|operation. 

1 

blank 



1 

|8nn2A - Write inhibited cn 

1 

| Reply tc retry the 

5 



| 3330 disk storage 

|operation. 

blank 



| (switch is in Read 

1 




! Only position). 

1 



L 

JL _ _ 

T _ _ __ 

L 

_J 
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Third Par t of Three-Part PIOCS Message-Sense Information (continued) 






r 

Operator 
reply: 
type in: 

L 

—i 

. j 

r t 

|Message|Meaning 
l i 

T 1 

|Action 

i j 

r 

T 


T T 

1 


|The meanings of the 

1 




|second digit of the 

1 




|third 

part are: 

1 




j.- 

— 

- 




|nOnnA 

- None (exairine 

1 




1 

the remaining 

1 




1 

1 

characters) 

1 

1 




1 

|nlnnA 

- Unit excep- 

f 

|Ignore the error and con- 

4 



1 

1 

tion. 

jtinue processing. 

1 

blank 



1 

|n2nnA 

- Nonrecovery. 

i 

|Reply to retry the oper- 

5 



1 

1 


jaticn. 

1 

blank 



1 

|n4nnA 

- Overrun. 

1 

|Ignore the error and con- 

4 



1 

1 


|tinue processing. 

1 

blank 



1 

|n8nnA 

- Data check. If 

1 

|Ignore the error, and 

4 



1 

the device is a 

|ccntinue processing, or 

blank 



1 

tape drive, the 

1 




1 

check is due to 

|Reply to retry the oper- 

5 



1 

a read error. 

|ation. 

blank 



Y - 

— 

-—H 




|The meanings of the 

1 




1 third 

digit of the 

1 




|third 

part are: 

1 




Y - 

— 

- f 




|nnOnA 

- None (examine 

1 




i 

the remaining 

1 




1 

characters). 

|Follow the action in- 




1 


|structicns specified 




1 


jby the first two 




1 

1 


|digits. 

1 




I 

|nnlnA 

- If disk, inva- 

1 

1 




1 

lid sequence 

1 




1 

of commands. If 

1 




1 

tape, tape unit 

1 




1 

has the 7-track 

1 




1 

feature instal- 

1 




1 

1 

led. 

1 

1 




1 

|nn2nA 

- If disk, end cf 

1 

1 




1 

the cylinder. If 

1 




1 

tape, tape drive 

1 




1 

1 

not ready. 

1 

1 




1 

|nn4nA 

- If disk, track 

1 

1 




1 

overrun. If 

1 




1 

tape, tape drive 

1 




1 

ready, but not 

1 




1 

rewinding. 

1 



l _ 

i 


i _ _ j 


_ j 
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T hird Part of Three-Part PIOCS Message-Sense Information (continued) 


r - T - 

|Message|Meaning 


"T- 

|Action 
4- 


Operator 
reply: 
type in: 


nn6nA - If disk, end of 
cylinder and 
track overrun 
have occurred 
simultaneously. 
If tape, tape 
drive ready 
and rewinding. 
nn8nA - Data check in 
count field. 
(This message 
for disk only). 


The meanings of the 
fourth digit are: 


nnnOA - None (If the chan¬ 
nel and unit ad¬ 
dress identified 
by the first part 
of the message is 
that of a tape or 
disk drive, and 
the third digit is 
also 0, a nonex¬ 
istent tape or disk 
unit has keen ad¬ 
dressed. ) 

nnnlA - If disk, overflow- 
incomplete. If 
tape, tape indica¬ 
tor is ON. 

nnn2A - If disk, missing 
address mark. If 
tape, tape drive is 
in file-protect status 

nnn4A - If disk, file mask 
violated. If tape, 
tape drive is in 
write status. 

nnn8A - If disk, no record 
found. If tape, the 
tape is at load point. 


Follow the action 
instructions specified 
by the first two digits. 
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DOS System Control--370N-CL-453 


Figure 1-27 contains both the naires of the programs included in this section and a 
summary of the library requirements for these programs. 


r 


T 



T 



T 



1 



Core 

Image 

1 

Relocatable 

1 

Source | 

1 

Component 


Library 

1 

Library 

1 

Statement j 

1 



Blccks 

1 



L 

Library 1 

1 


jPhase 

2311 

2314/ 

3330j 

Prefix 

Module 

Blocks 1Eooks 

Elccks| 

1 




2319 

1 



1 



i 


l 






!_ 


_ .j 

r 


T ” 



T 



T 


1 

|System Control: 




1 



**841 | 




IPL 

1 3 

6 

6 

8 I 

IJB 

1 

** 1 




Job Control 

| 10 

29 

29 

3 01 

IJB 

10 

** j 




Linkage Editor 

1 8 

16 

16 

19 | 

1 

IJB 

4 

* * J 

I 




Librarian: 




1 

1 



1 

1 




CORGZ 

1 9 

20 

20 

22 | 

IJB 

10 

** j 




MAINT 

| 10 

34 

34 

371 

IJB 

18 

** I 




CSERV 

1 1 

5 

5 

3 J 

IJB 

1 

** 1 




DSERV (Sorted) 

1 6 

10 

10 

10| 

IJB 

2 

** j 




RSERV 

1 1 

4 

4 

5 | 

IJB 

2 

** | 




SSERV 

f 1 

4 

4 

5 j 

1 

IJB 

2 

** | 

1 




Supervisor: 

1 1 

14 

14 

1 

211 



1 

1 




Macros: 




1 



1 




Communications 




1 



1 

26 

180 | 


Generation: 




1 



1 




Basic 




i 



f 

23 

3687 | 


MICR 




1 



1 

1 

237 | 


TP 




1 



1 

1 

7 

181 j 


IOCS: See Note. 




1 

1 



1 

I ***2 

24 | 


Card (Reader/Punch) 




1 

IJC 

64 

154 | 

2 

311 j 


Console 

\ 



1 



1 

1 

73 | 


Device Independent 




1 

IJJ 

4 

14 j 

2 

206 | 


Printers 




1 

IJD 

23 

52 | 

2 

196 | 


Serial Device 




1 



1 

1 

511 


PIOCS (DTFPH) 




1 



1 

1 

55 | 


Imperative Macros 




1 

1 



1 

i 

27 

3 06 | 


Transient: (System 




1 

1 



1 

1 




and Common IOCS) 

| 222 

222 

223 

2211 



1 




MCAR/CCH 

| 14 

14 

14 

14 j 
» 



1 

1 




Dumps: 




1 

i 



1 

1 




Standard System 

J 6* 

6 

6 

6 | 

IJB 

7 

46 | 




Translating System 

| 4* 

4 

4 

4 | 

1 

IJB 

5 

31 | 

1 




Aids : 




1 

1 



1 

1 




ESTVUT 

1 1 

3 

3 

3 | 

IJB 

1 

14 | 




PDAID 

1 15 

18 

18 

171 

IJB 

2 

38 | 




Transient 

1 1 

1 

1 

1| 



1 




EUMPGEN 

1 2 

8 

9 

91 

IJB 

1 

51 | 




LSERV 

1 1 

5 

5 

6 | 
i 

IJB 

1 

18 | 
i 




3211 Printer Support 

! 2 

2 

2 

i 

2 1 



i 

i 




Transients 

1 4 

4 

4 

41 



i 




UCSB 




1 

IJB 

6 

32 | 




System Generation 




1 



1 

5 

334 | 

L 


JL_ 



_l 



X- 


_j 


* Transients 

** The number of System Control Relocatable Library blccks includes only the IPL, Job 
Control, Linkage Editor, and Librarian Programs. 

***For BOS and EPS Compatibility 

N ote : See Compiler IOCS Module s for the preassembled module names and usage. 

Figure 1-27. CONTROL--DOS System Control Summary 
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IOCS 


SOURCE STATEMEN T LIBRAR Y 

The following iracros are shipped in the source statement library. 

Note: Module_4j__Compi le r IOCS Modul es , contains a list cf preass circled modules required 

by system programs. 


F il e De fi niti on M a cr os 


A.CEMOE 
A .DIMOD 
A.DTFBG 
A.DTFCD 
A.DTFCN 

A.ETFDI 
A.DIFEN 
A.DTFPH 
A.DTFPR 
A.ETFSR 
A.PRMOD 


Imperat iv e Macr os 


Basic 


Main Sto rage By tes 


Fcr literals (1) 


For Variables 


A.CCB 16-24 


A.CHECK 

8 



+ 4 


Note 

2 . 

A.CLOSE 

10 



+ 8 


Note 

3. 

A .CLOSER 

14 + 10 

if any Reg. 

is specified 

+ 8 


Note 

4 . 

A.CNTRL 

10-18 



+ 4 




A.ERET 








A.EXCP 

2-6 



+ 0-4 




A.FEOV 

8-12 



+ 4 




A.FEOVD 








A.FREE 

8-12 



+ 0-4 




A. GET 

8 



+ 4 per 

sym. name 

Note 

2. 

A.LERET 

2 





+ 2 


A.NOTE 

12 



+ 4 




A.OPEN 

10 



+ 8 


Note 

3. 

A.OPENR 

14+10 

if any Reg. 

is specified 

+ 8 


Note 

4. 

A.POINTR 

8 



+ 4 per 

sym. name 

Note 

2. 

A.POINTS 

8-12 



+ 4 




A.POINTW 

8 



+ 4 per 

sym. name 

Note 

2. 

A.PRTOV 

8 



+ 4 per 

sym. name 

Note 

2. 

A. PUT 

8-12 



+ 4 


Note 

2. 

A.READ 

8-36 

Note 5. 


+4 per 

sym. name 

Note 

6. 

A.RELEASE 








A.RELSE 

8 



+ 4 per 

sym. name 



A.SEOV 

10 



+ 8 


+ 3 


A.TRUNC 

8-12 



+ 0-4 




A.WAITF 

8-12 



+ 0-4 


Note 

3 . 

A.WRITE 

8-2 6 

Note 5. 


+ 0-4 
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Notes: 


1. Include the storage requirement for literals cnly cnce if the 
literal is used by more than one macro instruction. 

2. +4 per symbolic name, +2 per ordinary register nctaticn, or +0 per 
special register notation. 

3. +4 per filename or +8 per register. 

4. +14 per filename or +8 per register. 

5. 20 bytes are required for ETAM. 

6. +38 No operands coded in register notation. 


I OCS Macro St o rage Requirement s 


The storage required by the imperative macros may be determined by using 
the preceding figures with Figures 1-28 through 1-32. 


CDMOD (CARD MODULE) 



FIXUNE 


FIXUNB 


FIXUNB 


UNDEF 


UNDEF 


UNDEF 


VARUNB 


jL- T - 

|INPUT | 


"T--I 

| CNBND | 


r-f- 

I RECFORM I 


IOAREA2 


FIXUNE | 


UNDEF | 

--j.- 

VARUNE I 


| VARUNB | 

L-L. 


WORKA 


1442 | 2520 
2596 | 


116 | 122 


118 | 124 


132 | 138 


112 | 110 


124 | 132 


128 | 130 


140 | 146 


126 | 132 


140 | 146 


154 | 160 


156 j 162 | 120 | 

_L_J._ ±. 


2540 j 1442 
3525 | 


40 | 126 


84 | 154 


82 j 126 


96 j 154 


118 | 


Figure 1-28. CONTROL—CDMCD Main Storage Requirements (Part 1 of 3) 
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Notes: 


1. CTLCHR=YLS or ASA; depending upon record format, number of I/O areas, and/cr work 
area specifications: 


for YES, an minimum of 8 tc a maximum cf 36 additional bytes are required. 

for ASA, a minimum of 28 tc a maximum cf 65 additional bytes are required. 

2. RDONLY=YES changes the size cf the modules -50 tc +50 bytes. In addition, the user's 
program must provide a 72-byte save area each time the module is reentered. 


3. Parts 2 and 3 of Figure 1-28 shows the requirements for the other CEKGE options. The 
values selected must be added to the TYFEFLE value tc determine the amount of storage 
needed. 


CRDERR=RETRY 

"T 

1 

__L 

2520 

T 

1 

I 

2540 

without ICAREA2 or WCRKA 

t 

1 

+73 

T 

1 

1 

+ 123 

with either cr both 

T 

1 

_J. 

+ 69 

T 

1 

J. 

+ 119 


Figure 1-28 . CONTROL—CDMOE Main Storage Requirements (Part 2 of 3) 


"T-T-T-T-1 

1442 | 2540 | 2520 |3505/3525* 


CCNTROL=YES 


--j~ 

+ 30 | 

- +- 

+12 I 


INPUT 


+26 


4 - 


+ 82 | 

--f- 

+ 20 | 


+ 94 
+26 
+ 38 


OUTPUT Without WORKA | +24 


OUTPUT with WORKA 


+24 


+ 32 | 

--j~ 

+ 20 | 


+ 12 | 

- 4 - 

+ 12 1 
-4. 


CMBND without WORKA 


+ 24 


CMBND With WORKA 


+ 32 


+ 32 | 

_L. 


+ 12 | 
_L. 


Figure 1-28. CONTROL—CDMCE Main Storage Requirements (Part 3 of 3) 

♦Control may not be specified fcr input files used as associated files cn the 3525. 


D TFCD (DEFINE THE FILE CARD) 

TYPEFLE=INPUT requires 50 bytes. (56 bytes if ERRCPT is specified for a 3505 cr 3525, 60 
bytes if ASCCFLE is specified fcr a 3525.) 

TYPEFLE=CMBND requires 84 bytes. 

TYPEFLE=OUTPUT requires 48 bytes. (52 bytes if ASCCFLE is specified fcr a 3525, 128 
bytes if FUNC=I is specified fcr a 3525.) 


CRDERR=RETRY (2540 only) requires an additional 88 bytes. 
DEVICE=2520 requires 8 additional bytes. 
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DIMOD (DE VICE INDEPENDEN T SYS TEM UNI TS MOD ULES) 


r - T -T ---1 


TYPEFLE= 

1 

1 

i 

Basic 

Module 

1 

1 

x 

IOAREA 2=YES 

INPUT 

T 

1 

x 

316 

r 

1 

x 

+58 

OUTPUT 

T 

1 

667 

T 

1 

+ 84 


L_X_i_J 


Note ; RDONLY=YES changes the size of the ircdule -50 tc +50 bytes.In addition, the user's 
program must provide a 72-fcyte save area each tiire the module is reentered. 

Figure 1-29. DIMOD Main Storage Requirements 


DTFDI (DEF INE THE FILE DEVICE INDEPEN DENT SYSTEM UNITS) 
The table requirement is 240 bytes. 


PRMCD ( PRINTER MODULE ) 


r - TT - t -r- t-t r--r-1 

| || | | | |CTLCHR= | | | 

I I I BASIC | | | f- T - ^ | | 

|RECFORM=| j MODULE |WORKA=YES|ICAREA2=YESjPRINTOV |ASA |YES|CONTROL=YE£ j ERROPT = YES j 
| j j (Note 3)| | | (Note 4)j | | (Note 5) | (Note 2) | 

f.-44--j-- 4-4--j--4-4--j---j 

JFIXUNB | | 72 | +6 | +24 | +34 | + 128 I | +40 | +68 | 

j.-4-i-i--j--4-j-—4—i--4-^ 

jUNDEF j | 102 | +22 | +12 | +34 |+132 j +4 | +40 j +68 j 

j.-44-"i-4-4-4—4—4-4-•! 

jVARUNB || 136 | +14 | +12 | +34 | +12 41-4 j +40 j +68 j 

L_XJ_ X - X _-L- X -JL-L- ,-X -J 


N ote 1: RBCNLY=YES changes the size of the module -50 to +50 bytes. In addition, the 
user's program must provide a 72-byte save area each time the module is 
reentered. 


N ote 2; If ERROPT=YES is specified, then DEVICE=3211 must also be specified. Fcr a 3525 
add 22 bytes, instead of 68, for ERROPT. 


N ot e 3; For the 3525, add from 52 to 72 bytes tc the size of the basic module, depending 
on the type of associated file specified. 

N ote 4; For the 3525 add from 34 to 58 bytes. 

N ote 5: For the 3525 add from 40 to 160 bytes. 

Figure 1-30. CONTROL—PRMOD Main Storage Requirements 


D TFP R (DEFINE THE FIL E PRINTER ) 

The table requirement is 48 bytes or 52 bytes if ERRCFT is specified fcr the 3211 printer 
or, if ASOCFLE is specified, fcr the 3525 card punch. 
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DTFPH (DEFINE THE PHYSICAL IOCS) 


r- TT -1 

|Device | | Size | 

j.-4i- \ 

jTape || 104 | 

j.-44--f 

|DASD MOUNTED=ALL || 40 | 

K-H-1 

1 DASD MOUNTED=SINGLE || 84 j 

L_JLJl._J 


N ote : No module is required for this macro instruction. 

Figure 1-31. CONTROL—DTFPH Main Storage Requirements 
DTFCN (DE FINE THE FILE CONSOL E) 


r- n 

| TYPEFLE= | 


RECFQRM ; 

~T~ 
= 1 

WORKA 

= 1 

INPUT/CUTPUT 

-T- 

I 

OUTPUT only 

FIXUNE 

-f* 

1 

— 

1 

94 

-4- 

1 

60 

FIXUNB 

1 

YES 

— I" 
1 

150 

-4- 

1 

90 

UNDEF 

1 

_ 

1 

156 

-4- 

1 

114 

UNDEF 

1 

YES 

-+- 

1 

262 

-4- 

1 

168 


_JL_ 


-1. 


--L. 



N ote : No module is required for this macro instruction. 

Figure 1-32. CONTROL—DTFCN Main Storage Requirements 
DTFSR (DEFINE THE FIL E SE RIAL DE VICE) 

When a DTFSR is assembled, it generates both a table and a module. For example, if DTFSR 
is used for a printer, a table and a module are generated just as though DTFPR and PRMOD 
were used. To determine the main storage requirements for DTFSR, add the table and the 
module requirements for the appropriate device type,such as 48 bytes (DTFPR) and n bytes 
(PRMOD) for a printer. 


IPL 


L in ka ge Edit Statements 


CORE_IMAGE_LIBRARY 


INCLUDE IJBIPL 
// EXEC LNKEDT 


P hase s 


$IPLRT 2 
$IPLRT3 
$IPLRT 4 


RELOCATABLE LIE RARY 


Job Control 


CORE IMAGE LIBRARY 
Phases 


$JCBACCT * 

Module $JOECTLA 

... $JOECTLD 

$JOBCTLF 

IJEIPL $JOECTLG 
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$JOBCTLJ 
$JOECTLK 
$JOBCriM 
$JCECTLN * 

IJBRSTRT (restart) 

* Required for Job Accounting Interface 


R ELOCATAB LE LIBRA RY 
Modules 


$JCEACCT 
IJBJC 
IJEJCl 
IJBJC2 
IJEJC3 
IJBJC4 
IJEJC5 
IJBJC6 
IJEJC7 

IJBJC8 (Job Accounting Interface) 


L inkage Edi t Statements 


INCLUDE IJBJC 
// EXEC LNKEET 


Linkage Editor 


CORE_IMAGE_LIBRARY 

Phases 


$LNKEDT Initialize/overhead (Phase 1) 

$LNKEDTA Pass 2 processcr (Phase 7) 

$LNKEDTC Catalog processor (Phase 8) 

$LNKEDT0 12-2-9 processor, ESD only 

(Phase 2) 

$LNKEDT2 12-2-9 processor, ncn-ESD 

(Phase 3) 

$LNKEDT4 Control card processor (Phase 

4) 

$LNKEDT6 Control card processor (Phase 

5) 

$LNKEDT8 MAP processor (Phase 6) 


REL OC ATABLE LIBRARY 
Modules 


IJBLBC 

IJELBI 

IJBLE 

IJELE1 


Linka ge Edit State ire nts 


INCLUDE IJBLE 
// EXEC LNKEDT 

INCLUDE JOBACCT 
// EXEC LNKEDT 


WOR KFILE REQUIREMENTS FOR LINKAGE EDITOR 

This section contains infcriraticn for 
determining the workfile requirements for 
the Linkage Editor and Assembler when the 
wcrkfile is on an IBM 2311, 2314/2319, or 
3330. 

Two workfiles are used by the linkage 
Editor: SYSLNK for input, and SYSC01 for a 

workfile. 

The best overall performance for linkage 
editing results from using two disks and 
one tape: SYSRES and SYSLNK each assigned 
tc a separate disk drive, and SYSCC1 
assigned to tape. When possible, SYSLNK 
should be assigned to the faster of the two 
disks because more I/O is performed on 
SYSLNK than on SYSRES. Eecause linkage 
editing time is relatively small compared 
to assembler or compiler times, optimum 
assignments for assembling and linkage 
editing (or compiling and linkage editing) 
should be based on assembler or compiler 
conditions, not linkage edit time. When 
making optimum workfile assignments, the 
majcr consideration should be compiler 
time. A savings in linkage editing time is 
generally at the expense cf compiler 
performance. 

When built by a language processor, 
SYSLNK contains 25 card images per track on 
a 2311, 39 on a 2314/2319, and 6C on a 
3330. When an object deck is used as input 
tc the Linkage Editor, jet control formats 
SYSLNK. In this case, SYSLNK contains 9 
records per track cn a 2311, 16 on a 
2314/2319, and 28 on a 3330; ESD, TXT, and 
RLE cards are packed 4 per record while all 
other input cards are not packed (1 per 
record). 

In a compile and link-edit situation, 
any allocation made for SYS001 for the 
compilation is more than sufficient as a 
workfile allocation for the Linkage Editor. 
However, when you must allocate SYS001, you 
can use the following information. The 
Linkage Editor workfile (SYSC01) contains 
11 records per track on a 2311, 21 on a 
2314/2319, and 35 cn a 3330. The total 
number of records (R) required fer 
link-editing a program is equal to the 
following: 
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where j~ ~J = rounded high 

XiiX 2) ...,x n = number of RLD cards in each 
module to be processed by 
the linkage editcr. 


Librarian 


The following are the librarian programs. 

N ot e: Module IJBLBC (error message 

routine) is a common module used by 
more than one librarian program and 
also by the linkage editcr. 


CORGZ 


CORE IMAGE LIBRARY 
P ha ses 


CORGZ 

CORGZl 

C0RGZ2 

CORGZ3 

C0RGZ4 

C0RGZ5 

C0RGZ6 

C0RGZ7 

C0RGZ8 


RELOCATABLE_LIBRARY 

Modules 


IJELBJ 

IJBLBK 

IJEIBS 

IJBIBT 

IJELBU 

IJBLBV 

IJEIBW 

IJELBX 

IJBLBY 

IJESL5 


L in ka ge E dit Statement s 


INCLUDE IJBSL5 
// EXEC LNKEDT 


MAINT 


CORE IM AGE LIBRARY 
Phases 


MAINT 

MAINTA 

MAINTCI 

MAINTCN 

MAINTDR 

MAINTEJP 

MAINTR2 

MAINTS2 

MAINTUP 

$MAINECJ Update program routine 


RELOCATABLE LIBRAR Y 
Modules 


IJBLEA 

IJBLBC 

IJELED 

IJBLEE 

IJBIBF 

IJELEG 

IJBLBH 

IJBLBL 

IJELEM 

IJBIBQ 

IJBLBZ 

IJEMCS 

IJBMDS 

IJBMEU 

IJBMIN 

IJBMIO 

IJBMUP 

IJBSL2 


L inkage Edit Statement s 


INCLUDE IJBSL2 
// EXEC LEKEDT 


CSERV 


CORE IMA GE LIB RARY 
Phase 


CSERV 
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RELOCATABLE LIB RAR Y 
Module 

IJELEP 

Linka ge Edit St ateme nts 

INCLUDE IJBLBF 
// EXEC LNKEET 

DSERV 

CORE_IMAGE_LIBR AR Y 
P ha ses 

DSERV 

DSERVl 

DSERV2 

DSERV3 

DSERV4 

DSERV5 

RELQCATABLE_LIBRARY 

M odu les 

IJBLBC 

IJESL1 

Linkage E dit St ateme nts 

INCLUDE IJBSL1 
// EXEC LNKECT 

RSERV 

C ORE IMAGE LIBRARY 
P ha se 

RSERV 

R ELOCATAB LE LI ERARY 
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Modules 

IJELEC 
IJBSI3 

L inkage E dit St ate ments 

INCLUDE IJBSL3 
// EXEC LNKEDT 

SSERV 

CO RE IMA GE LIBRAR Y 
Phase 

SSERV 

RELOCATA BLE LIBRAR Y 
Modules 

IJBSL4 

IJBLBC 

Linkage Edit State ments 

INCLUDE IJBSI4 
// EXEC LNKEDT 

Supervisor 

CORE_IMAGE_LIBRARY 

Phase 

$$A$SUPl 

S OUR CE STATEMENT LIBRARY 
Macr os 

SUPERVISOR COMMUNI CATION: 

Main S t orage B y tes 

B asi c For L iterals (1 ) 

A.ATTACH 18-32 +0-4 (Note 2) 

A.CALL 2-16 +0-4 (Note 2) 

A.CANCEL 4-6 AIL+2 
















A.CHKPT 

A.CHNG 

38-42 


A.CCMRG 

6 


A.DEQ 

4-8 

+ 0-4 

A.DETACH 

2-6 

+ 0-5 

A.DUMP 

6 

8 

A.ENQ 

4-8 

+ 0-4 

A. EOJ 

*;.2 


A.EXIT 

2 


A.FETCH 

2-10 

+ 8-12 

A.GETIME 

10-94 

+ 0-8 

A. LOAD 

2-10 

+ 8-12 

A.MVCOM 

12-16 

+ 0-4 

A.PCUMP 

10-2 8 

+ 0-16 

A.POST 

4-8 

+ 0-8 

A. RCB 

8-10 


A.RETURN 

2-6 


A.SAVE 

4 


A.SETIME 

6-14 

+ 0-8 

A. STXI'I 

2-14 

+ 4-12 

A.TECB 

4 


A.WAIT 

10-14 

+ 0-4 

A.WAITM 

Notes: 

8-12 

+ 0-4 


1. Include the storage requirement for 
literals only once if the literal is 
used by more than one macro 
instruction. 

2. +4 bytes per operand fcr variables. 

SUPERVISOR GENERATION: 


♦ Op tio na l 

A.SMICR 

N ot e: This macro is part of the MICR 

program but is required to generate 
a supervisor with MICE support. 

* For a detailed description of storage 
requirements, refer to Supervisor Main 
S to rage Requirements. 

T ele prcce ssing : 

A.IJLQBFRD 
A.IJLQDSCT 
A.IJLQIP1D 
A.IJIQQCBD 
A.IJLQSTBD 
A.IJIQTSVC 
A.IJLQVECD 

Note: These macros are part of the QTAM 

program but are required to generate 
a £TAM supervisor. 


System Generation Macros 


A.DOSCHLV 
Z.DELETECI 
Z.DELETERL 
Z.DELETESI 
Z.LINKEDIT 


♦Basi c: 

A.ALLOC 
A.ASSGN 
A.CCMMN 
A.COMMNEX 
A.CCNFG 
A.DVCGEN 

A.FOPT 
A.IOTAE 
A.LU3GEN 
A.MCRAS 
A.MAPLOWC 
A.MAPPUB2 
A.PIOCS 
A.SEND 

A.SGDFCH 
A.SGDSK 
A.SGSVC 

A.SGTCHS 
A.SGTCON 
A.SGTHAP 
A.SGUNCK 

A.STDJC 
A.SUPVR 
A.TRTAB 


MCAR/CCH 


CORE IM AGE LIB RARY 
Transients 


$$BCCHHR 

$$RAST00 

$$RAST01 

$$RAST02 

$$RAST03 

$$RAST04 

$$RAST05 

$$KAST06 

$$RAST07 
$ $RAST08 

$$RAST09 
$$RAST10 
$$RAST11 
$$RAST12 


CCH and Initial MCAR analysis 
Channel and machine check record 
builder and recorder 
Channel check analysis 
EFL and MCAR analysis 
Unit record channel check ERP 
Unit record channel check ERP 
3505 and 3525 channel check 
handler ERP 

Magnetic tape ERP (2400 series) 
Machine check and channel check 
record writer 
Partition reallocation 
ERP message writer 
Message writer 

Magnetic tape ERF (3400 series) 
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Transients 


Transient routines. Type A transient routines (device error routines) 
have the prefix $$A. ($ is an alphabetic character in System/370.) 

Type B transient routines (OPEN, CLOSE, CHKPT, etc) have the prefix $$E. 


Device Error Routines and OP EN/CLOSE Phases fcr Disk Operating Systenr 


The following is a list of required system control and common IOCS 
transients. 


$$ANERAA 


Unit check/MDR record writer 


$$A$SUP1 

$$ANERAB 

$$ANERAC 

$$ANERAD 

$$ANERAE 

$$ANERAF 


Supervisor 
Message writer 

Statistical ccunter update fcr disk and unit record 
Statistical counter update for tape 
Message writer 
RMSR message writer 


$$ANERAG 

$$ANERAM 

$$ANERAN 

$$ANERAP 

$$ANERAT 

$$ANERAU 

$$ANERAV 

$$ANERR 

$$ANERRA 

$$ANERRB 


SVC44 record writer 
Tape-error recovery 
Tape-error recovery 
Tape-error recovery 
Unit check record builder 

BTAM, MDR, and 3330 Unit check and MDR record builder 
RMSR device code modifier 

Physical attention rcutine-cancel delay phase 
Error recovery monitor 
Error recovery rrcnitcr 


$$ANERRC 

$$ANERRD 

$$ANERRE 

$$ANERRF 

$$ANERRG 


Error recovery monitor 
Tape-error recovery 
Tape-error recovery 
Tape-error recovery 
Data cell (2321)-errcr recovery 


$$ANERRH 

$$ANERRI 

$$ANERRJ 

$$ANERRK 

$$ANERRL 


Data cell (2321)-error 
Data cell (2321)-errcr 
Data cell (2321)-error 
Data cell (2321)-errcr 
Tape-error recovery 


recovery 

recovery 

recovery 

recovery 


$$ANERRM 

$$ANERRN 

$$ANERRO 

$$ANERRP 

$$ANERRQ 


Unit check record builder 
Message writer (Phase 2) 
Message Writer (Phase 3) 
Message writer (Phase 4) 
Message writer (Phase 5) 


$$ANERRR 

$$ANERRS 

$$ANERRU 

$$ANERRV 

$$ANERRY 


Message writer (Phase 6) 
Message Writer (Phase 7) 
Unit record errcr recovery 
Unit record error recovery 
Physical attention routine 


$$ANERRZ 

$$ANERR0 

$$ANERR1 

$$ANERR6 

$$ANERR7 


Physical attention routine 

Physical attention routine 

Modify communication region 

2495 Tape Cartridge Reader Error Recovery 

2495 Tape Cartridge Reader Errcr Recovery 


$$ANERR8 

$$ANERSA 

$$ANERSB 

$$ANERSC 

$$ANERSD 

$$ANERSE 


2495 Tape Cartridge Reader Error Recovery 

3211 Error Recovery 

MDR record builder (Phase 1) 

MDR record builder (Phase 2) 

3505 Card reader and 3525 card punch error recovery 
2245 error recovery 
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$$BATTNA 

Supervisor 

$$BATTNB 

Supervisor 

$$EATTNC 

Supervisor 

$$BATTl^D 

Supervisor 

$$BATTNE 

Supervisor 

$$EATTNF 

Supervisor 

$ $BATTNG 

Supervisor 

$$EATTWH 

Supervisor 

$$BATTNI 

Supervisor 

$$EATTNJ 

Supervisor 

$$BATTNK 

Supervisor 

$$BATTNL 

Supervisor 

$$EATTNM 

Supervisor 

$$BATTNN 

Supervisor 


program terminator 
program terminator 
initiator 

nonresident attention routine 

nonresident attention routine 
nonresident attention routine 
nonresident attention routine 
nonresident attention routine 
foreground initiator 

foreground initiator 
foreground initiator 
foreground initiator 
foreground initiator 
nonresident attention routine 


$$EATTj.MO 
$$BATTNP 
$$EATTNQ 
$$BATriMR 
$$EATTNS 
$$BATTNT 
$$EATTdU 
$$BATIiW 
$$BATTi'JW 
$$EATriMX 
$$BATTNY 
$$EATTNZ 
$$BATTN4 
$$BCCPTl 
$ $BCE0V1 
$ $BCHKPD 


Supervisor, nonresident attention 
Supervisor, nonresident attention 
Supervisor, nonresident attention 
Supervisor, nonresident attention 
Supervisor, nonresident attention 
Process ALTER statement 
Process DSPLY statement 
DUMP command processor 
DUMP command processor 
DUMP command print routine 
Supervisor, nonresident attention 
Supervisor, nonresident attention 
ATTN-LOG-NOLOG processor 
System required tape open 
Monitor-EOV/EOF 
Disk-checkpoint 


routine 

routine 

routine 

routine 

routine 


routine 

routine 


$ $ECHKPE 
$$ECHKPF 
$$BCHKPT 
$$ECBKP2 
$$BCHK3G 
$$BCIS0A 


Disk-checkpoint 

Disk-checkpoint 

Tape-checkpoint 

Tape-checkpoint 

Erase gap for logical files 

ISFMS - CLOSE 


$$ECLOSE 

$$BCLOSP 

$$ECL0S2 

$$BCMT01 


Close monitor 
Punch file close 
Close 

Tape EOF/ECV input-forward 


$$ECMT02 

$$ECMT03 

$$BCMT04 

$$ECMT05 

$$BCMT06 


Tape CLOSE-alternate switching 
Tape CLOSE input-backward 
Tape EOV output-forward 
Tape CLOSE 

Tape CLCSE-wcrkfiles 


$$ECMT07 

$$BDRSTR 

$$EDUMP 

$$BDUMPB 

$$ECUMPD 

$$BDUMPF 


ape-alternate switching 
isk restart phase 
uperviscr, program terminator 
uperviscr, program terminator 
nperviscr, program terminator 
uperviscr, prcqram terminator 


$$BENDFF 
$$EENDFL 
$$BEOJ 
$$BE0J1 
$$BEOJ 2 


ISFMS-ENDFL 
ISFMS-ENDFL 
Supervisor, 
Supervisor, 
Supervisor, 


(Lead phase 2) 
(Load phase 1) 
program terminator 
program terminator 
program terminator 


$$EE0J2A 
$$EEOJ 3 
$$BE0J3A 
$$EE0J4 


Supervisor, 
Supervisor, 
Supervisor, 
Supervisor, 


program terminator 
program terminator 
program terminator 
program terminator 
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$$BEOJo Supervisor, program terminator 

$$BE0J7 Supervisor, prcqrarr teririnatcr 


$$BERRTN 
$$EFCE 
$ $BILSVC 
$$EINDEX 
$$BJCOPT 
$$EJC0P1 
$$BLISTV 
$$ELVTCC 


System required error recovery 
3211 FCE standard load 
Supervisor, program terminator 
Cylinder index in core (ISFM-S) 

Job Control, OPEN Tape routine 
Job Control, OPEN Tape routine 
List VTOC (2311 and 2314/2319 only) 
List VTOC (2311, 2314/19 and 3330 


$$BLSTIO 
$$BMSGWR 
$$ECCPMl 
$$B0CPM2 
$$EGCPT1 
$$B0CPT2 
$$BCCPT3 
$$B0CPT4 
$ $EGCP01 
$$B0CP 02 
$$ECCPll 

$$ECCP12 


System control 
Tape open/clcse 

System required message writer 

System required message writer 

System required OPEN for input tape (Phase 1) 

System required CPElx for unlateled output tape 

System required OPEN for labeled output tape 
System required OPEN for input tape (Phase 2) 

System required table, disk DTFs, OPEN Version II 
System required table, ncndisk ETFs, CFEN Version II 
System required table, tape or disk system DTFs, OPEN 
Version I 

System required table, tape system DTFs 


$$EGDACL 
$$BODAIN 
$ $ECDAIl 
$$B0DA01 
$$B0DA02 


Close Routine-DA 

Direct access input-CPEN (Input) 
Open input-DA 

Direct access-CPFN output Phase 1 
Direct access-OPEN output Phase 2 


$$B0DA03 
$$B0DA04 
$$ECDAUl 
$ $BODQUE 
$$BCDSMW 
$$BODSPV 


Direct, access OPEN-output Phase 3 

Direct access CFEN-output Phase 4 

Direct access-OPEN 

Dequeue JlE’s 

Message writer 

Disk VTOC display routine 


$$ECDSPW 
$$BCFLPT 
$$BOIS01 
$$BOIS 02 
$ $B0IS 03 


Disk VTOC display routine 
DASD file prefect 


ISFMS - 

CFEN 

I/O 

Phase 

1 

ISFMS - 

OPEN 

I/O 

Phase 

2 

ISFMS - 

CFEN 

I/O 

Phase 

3 


$$EOIS04 
$$B0IS 05 
$$EOIS06 
$$BOIS 07 
$$BOIS08 


ISFMS - 

OPEN 

I/O 

Phase 

4 

ISFMS - 

CFEN 

I/O 

Pha se 

C 

ISFMS - 

CFEN 

I/O 

Phase 

6 

ISFMS - 

OPEN 

I/O 

Pha se 

7 

ISFMS - 

CFEN 

I/O 

Phase 

8 


$$ECIS09 

$$BOISlO 

$$EOMRCE 

$$EOMSGl 

$$BOMSG2 


Index sequential independent overflow area integrity 

ISFMS - OPEN 

OPEN for OMR and RCE 

Message non-abort types 

Message writer - abort types 


$$EOMSG3 

$$BOMSG4 

$$B0MSG5 

$$ECMSG6 

$$BOMSG7 


Message writer 
Message writer 
Message writer 
Message writer 
Message Writer (ASCII) 


$$BOMTOM Tape OPEN message 

$$BOMTOW Tape OPEN message 
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$$BCMT01 
$ $BOMT 02 
$ $BCMT 0 3 


Tape OPEN input-forward-standard labels (Phase 1) 
Tape OPEi\ input-backward-standard labels 
Tape OP Eh output forward-standard label 


$$BOMT 04 

$$BCMT05 

$ $ECMT 06 

$$BOMTC7 

$$ECNVCL 

$ $EOPEN 

$$BOPE«l 


Tape OPEN output-standard labels 

Tape OPEN I/C-forward/backward nonstandard/unlabeled 
Tape OPEN workfiles 

Tape OPEiv input-forward-standard labels (Phase 2) 
Tape rewriting 
RM3R tape processor 
Open ironitcr 


$$EOPENC 
$ $BOPEND 
$ $ECPENR 
$$BOPEN2 
$$ECPlGN 
$$BOPNLB 


OPENC 

Disk OPEN-volume ID handler 
Relocation Phase 1 
Open monitor 
Open monitor 

Locates source statement library. Directory also 
locates source statement library (for Assembler and 
COBOL) 


$$ECPNR2 
$ $BCRTV1 
$$ECRTV2 
$ $BOSDC1 


Relocation Phase 2 
ISFMS Open 
ISFMS Open 

Sequential disk I/O - CLOSE 


$ $BOSDC 2 
$ $BCSDEV 
$ $BOSD11 
$$ECSDI2 
$ $BOSDI3 
$$ECSDI4 


Sequential disk 
DTEDA and BTFSD 
Sequential disk 
Sequential disk 
Sequential disk 
Sequential disk 


close 

forced End of 
input - OPEN 
input - OPEN 
input - OPEN 
input - OPEN 


Volume 


$ $BOSDOl 
$ $BCSD02 
$ $B0SD03 
$$ECSDC4 
$ $BOSDO 5 


Sequential 

disk 

output 

Pnase 

1 

- OPEN 

Sequential 

disk 

output 

Pnase 

2 

- OPEN 

Sequential 

Disk 

output 

Pnase 

3 

- CPEN 

Sequential 

disk 

output 

Phase 

4 

- OPEN 

Sequential 

disk 

output 

Pnase 

5 

- OPEN 


$ $B0SD06 
$ $ECSD07 
$$B0SD08 
$ $ECSDC9 
$ $ECSDWl 


Sequential disk 
Sequential disk 
Sequential disk 
Sequential disk 
Sequential disk 


open - Phase 6 
output - OPEN 
output - OPEN 
output - OPEN 
workfiles Phase 1 


CFEN 


$ $BOSDW 2 
$$BOSDW3 
$$EOSDOO 
$ $BOSD 01 
$$ECSIGN 


Sequential disk workfiles Phase 2 - CFEN 
Sequential wcrkfile Phase 3 - OPEN 
Sequential disk OPEN - output Phase 0 
Sequential disk CPEN - output Phase 1 
System open 


$ $BOUR 01 

$$ECVDMP 

$$BOWDMP 

$$B02321 

$ $EPCHK 

$$BPDAID 

$$BPDUMP 

$$BPDUM1 

$$EPSi^ 


Unit reccrd-OPEN routine 
Disk VTOC dump 
Disk VTOC dump 
OPEN data cell 

Supervisor - program terminator 
Problem Determination 
Standard PDUMP monitor 
Standard PDUMP 

Supervisor - program terminator 


$$BR£LSE 
$$ERMSG1 
$$BRMSG2 
$ $BRSTRB 
$$ERSTRT 


Device release 
Message writer CHKPT-RSTRT 
CHECKPOINT-RESTART message writer 
Tape Restart 

RESTART message writer - Phase 2 


$$BRSTR2 Tape and DASD verify for restart 

$$ERSTR3 DASD verify for restart 
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$$BRSTR4 

$$ESDRUP 

$$BSETFF 


Tape Reposition 

Suppress writing on recorder file 
ISFMS load Phase 2 of SETFL 


$$ESETFG 

$$BSETFH 

$$BSETFL 

$$BSETL 

$$BSETL1 

$$BSYSWR 

$$BTERM 

$$BUCB 

$$BUFLDR 

$$EUFLD2 


ISFMS load Phase 3 of SETFL 
ISFMS load Phase 4 of SETFL 
ISFMS load Phase 1 or SETFL 
ISMOD - SETL 
ISMOD - SETL 

Supervisor, nonresident attention 

Supervisor, program teririnatcr 

3211 UCSE standard load 

3211 FCB and UCSE IPL loader 

3211 FCB and UCSB IPL loader error routine 


Standard System Dump 


CORE IM AGE LIBRARY 
T ransient s 


$$EEUMP 

$$EDUMPE 

$$BDUMPD 

$$BEUMPF 

$$BPDUMP 

$$EPDUM1 


RELOCATABLE LIB RARY 
M odules 


IJEEMPBS 
IJBDMPDS 
IJEEMPFS 
IJEEMPS 
IJBDUMPS 
IJBPDMPS 
IJEPDUMS 


REL OCATABLE LIBRARY 
Modules 


IJEEMPBT 
IJEDMPDT 
IJBDMPT 
IJEDUMPT 
IJBPDMPT 


Linkage Edit S t ate ments 


INCLUDE IJBDUKPT 
// EXEC LNKEDT 


ESTVUT 


CORE IMAGE LIBRARY 
Pha se 


ESTVUT 


L inkage Edit Statements 


INCLUDE IJBDUMPS 
// EXEC LNKEET 


RELO CATABLE LIBRAR Y 
Modul e 

IJBTESUT 


Translating System Dump 


CORE IM AGE LIBRARY 
T ransients 


$$EEUMP 

$$BDUMPB 

$$EEUMPD 

$$EPDUMP 


Linkage Edit Statements 


For a multiprogramming systeir : 
PHASE ESTVUT,+0 
INCLUDE IJBTESUT 
// EXEC LNKEDT 

For a non-roultiprogramming system 
PHASE ESTVUT,S 
INCLUDE IJBTESUT 
// EXEC LNKEDT 
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PDAID 


DUMPGEN 


CORE_IMAGE_LIBRARY 

Phases 


PDAID 

PDAIDFTT* 

PDAIDFTP* 

PDAIDFTW+ 

PDAIDGTT* 

PDAIDGTP* 

PDAIDGTW* 

PDAIDITT* 

PDAIDITP* 

PDAIDITW+ 

PDAIDQTT* 

PDAIDQTW* 

PDAIDTDP* 

PDAIDTDT* 

PDLIST 

♦Only present in core-image library. 


Transient 


$$BPDAID 


RELOCAT ABLE LI BRARY 
Modules 


IJEFDAID 
IJBPDLST 


L in ka ge E d it Statements 


For a non-multiprogramming system: 
PHASE PDAID,S 
INCLUDE IJBPDAID 

/* 

// EXEC LNKEDT 

PHASE PDLIST,S 
INCLUDE IJBPDLST 

/♦ 

// EXEC LNKEDT 

F or a multiprogramming system : 

PHASE PDAID , + 0 ~ ~ " 

INCLUDE IJBPDAID 

/♦ 

// EXEC LNKEDT 

PHASE PDLIST,+0 
INCLUDE IJBPDLST 

/♦ 

// EXEC LNKEDT 


COR E IMAGE LIB RARY 
Phases 


DUMPGEN 

DUMPGEN1 


REL OCATA BLE LIBRARY 
Module 


IJBDMPGN 


Link age E dit St ate m ents 


For a non-multiprogramming system : 
PHASE DUMPGEN,S 
INCLUDE IJBDMPGN 

/* 

// EXEC LNKEDT 

For a multiprogramming system : 
PHASE DUMPGEN,+0 
INCLUDE IJBDMPGN 

/* 

// EXEC IKKEDT 


LSERV 


CORE IMAGE LIBRARY 


Phase 


LSERV 


RELOC ATABLE LIBRARY 
Modul e 


IJBLSERV 


Link age Edit Statements 


For a non-multiprogramming system : 
PHASE LSERV,S 
INCLUDE IJBLSERV 

/* 

// EXEC LNKEDT 
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F or a multipr o gra mm ing sy s teir : 
PHA.SE LSERV,+0 
INCLUDE IJBLSERV 

/* 

// EXEC LNKEDT 


3211 Printer Support 


CORE IMAGE LIB RARY 
Phases 


SYSBUFLD 

SYSEUFF1 


Transients 


$$BFCB* 

$$EUCB* 

$$BUFLDR* 

$$BUFLD2* 

♦Required for IPL if 3211 is present. 


IJBTRA11 
IJBTRG11 
IJBTRH11 
IJBTRPll 
IJBTRT11 


Linkage E dit Statements 


PHASE $$BUCB, +0 
INCLUDE IJBTRxnn 
// EXEC LNKEDT 


Where xnn is the train type cn your 3211 
printer other than the All supplied in the 
cere inage library. 


F or a non-multiprog r amming systeir : 
PHASE SYSBUFLD,S 
INCLUDE IJBSBUFF 
PHASE SYSBUFF1,S 
INCLUDE IJBSBUF1 
// EXEC LNKEDT 


F or a multiprogramming systeir : 

RELOC ATABLE LIB RARY PHASE SYSBUFLD,+0 

INCLUDE IJBSBUFF 

M odule s PHASE SYSBUFF1,+ 0 

INCLUDE IJBSBUFl 
// EXEC LNKEDT 

IJBSBUFF 

IJESBUF1 


190 


DOS Version 4 System Generation 








Supervisor Nucleus (14K)—370N-SV-495 


T “ 
1 

1 


Number of Library 
Blocks 



Phases J 

..i 

2311 

1 2314/2319 

1 

T 

1 

X _ 

3330 

T 

1 i 

X . 

18 

1 

| 19 

X 

T 

1 

_r_ 

21 


CONFIGURATION 


Figure 1-31 represents the parameters and 
their specifications of the IBM-supplied 
supervisor. 


Operation 

T" 

1 

l 

Operand 

SUPVR 

CCNFG 

t 

1 

! 

MODEL=l55 

STD JC 

FOPT 

I 

I 

PC=YES f OLTEP=NO 

PIOCS 

1 

BMPX=YES,TAFE=7 r DISK=3330 

ICTAE 

1 

JIB=10,D3420=4,D3330=2 

SEND 

1 

14336 

END 

1 

_x. 



Figure 1-31. SUPERVISOR 

(14K)—IBM-Supplied 
Supervisor for Disk Operating 
System 


CORF IMAGE LIBR AR Y 
Phase 


$$A$SUPl 
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Module 2: Emulating the 1401,1440, and 1460 

on Models 135,145, and 155 


Modular Outline 

Partition Size Required.194 

Source Statement Library.194 

Macros.194 

Delete Statements .194 

Relocatable Library.194 

Linkage Edit Statements .195 

Delete Statement.195 

Cere Image Library .195 

Transients.195 

Phases .195 

Delete Statements.195 

Sample Program .195 

Sample Program Summary.195 
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The 1401/1440/1460 Emulator Program for the 
IBM System/370 consists of a group of iracrc 
instructions and object and load modules 
that are shipped in the source statement, 
relocatable, and core image libraries. Two 
sample programs that test the vicrking cf a 
1401/1460 program and of a 1440 program 
under the emulator are contained in the 
source statement library under the name Z. 
EMSPL01. The source cards of this program 
are cataloged under the name Z. EMSPL01S. 


PARTITION SIZE RE QUIR ED 


A.IIt*IU 
A.IIQOJ 
A.IIQUR 
A.MCFU 
A. MIC 


Delete Statements 


EELETS A.ANUM 
DELETS A.BDIL 
EELETS A.EIFLAG 
DELETS A.CCMP 


This emulator program requires at least a 
20,480 byte partition. For further 

information, refer to the emulator DELETS A.MIC 

publication listed in the Preface. 


SOURCE STATEMENT LIBRARY 


RELOCATABLE LIBRARY 


r 

1 


r 

-T 


| Number of 

1 

Number of | 

| Number of 

1 

Number of Library Blocks 

j Macros 

! 

Library Blocks | 

| Modules 

1 

(Physical Records) 

1 

1 

(Physical Records) | 

t- 

-4- 


h- 

-4- 

- f 

| 27 

1 

235 

| 32 

1 

4556 | 

i 

-X. 

— 

i 

_ j_ 

j 




Macros 





Bytes of 




Module Name 


Main Storaqe 

A.ANUM 



IIQAP 


345 

A.BDIL 



IIQBF 


250 

A.BIFLAG 



IIQBY 


449 

A.COMP 



IIQCC 


1675 

A.DBIB 



IIQCE 


2404 

A.DDTF 



IIQCN 


727 

A.DDUB 



IIQCP 


422 

A.DIIQCR 



IIQCS 


5216 

A.DIL 



IIQDB 


764 

A.DSUB 



IIQDI 


786 

A.EMCNSL 



IIQDK 


2045 

A.EMDISK 



IIQEJ 


290 

A.EMEND 



IIQEP 


755 

A.EMPNCH 



IIQMC 


486 

A.EMPTR 



IIQMD 


814 

A.EMRDR 



IIQMT 


629 

A.EMSPL01 



IIQMTP 


741 

A.EMSPL01S 



IIQMW 


592 

A.EMSUP 



IIQNT 


2106 

A.EMTAPE 



IIQOA 


1674 

A.EMULATOR 






A.EMVERIFY 



IIQOE 


1538 




ngpcsT 


6005 

A.IIQBR 



IIQPR.E 


7015 

A.IIQCR 



IIQSD 


390 

A.IIQDS 



IIQTP 


1829 

A.IIQEI 



IIQUR1 


1281 

A.IIQID 



IIQVT 


3376 
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Linkaqe Edit Statements 

Phases 

Tape Preprocessor Program 

IIQOC 


IIQCD 

PHASE phasename,*,NCAUTC 

IIQOE 

INCLUDE IIQMTP 

IIQCF 

INCLUDE IIQPRE 


ENTRY IIQPRE 

IIQCG 

/* 

IIQOB 

// LBLTYP TAPE 

IIQCI 

// EXEC LNKEDT 

IIQOK 


Tape Postprocessor Program 


PHASE phasename,*,NOAUTO 
INCLUDE IIQMTP 
INCLUDE IIQPOST 
ENTRY IIQPOST 


// LBLTYP TAPE 
// EXEC LNKEDT 


Delete Statements 


DELETC IIQC.ALL 
EELETC $$EIIQBD 
DELETC $$EIIQBS 
EELETC $$EIIQMW 


DELETC $$EIIQT6 

Delete St atem en t 

DELETE IIQ-ALL S am ple Pr ogram 


C ORE IM AGE LIBR ARY 


r- t-1 

j Phases j Blocks j 

r-4-i-il 

j Transients J 11 | 11 j 

4-4-4--f 

j Phases ] 8 j 91 

L _J_J_J_J 


Transient s 


$$BIIQBD 

$$EIIQBS 

$$EIIQMW 

$$BIIQSD 

$$EIIQSS 


Z.EMSPL01,Z.EMSPL01S 

SAMPLE PROGRAM SUMMARY : Figure 2-1 
illustrates the card deck that is punched 
when the sample programs are retrieved from 
the source statement litrary. 


f - 1 

j Cards Retrieved j 


}- 

1 CATALS Z.EMSPL01,4.0 
j BKEND Z.EMSPL01 

j 1400 ctject decks and source decks 
1 BKEND 

j CATALS Z.EMSPL01S,4.0 
j EKEND Z.EMSPL01S 
j 1400 source deck 
I EKEND 


-1 


J 


Figure 2-1. Sample Program Card Deck, 
1401/1440/1460 Emulator 


$$BIIQT1 

$$EIIQT2 

$$BIIQT3 

$$EIIQT4 

$$BIIQT5 

$$EIIQT6 


The sample program lists 20 records on 
the printer, and it writes out the records 
on tape if tape is available and assigned. 
For a complete description of the sample 
programs, refer tc the 1401/1440/1460 
Emulator manual listed in the Preface. 
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Module 3: Emulating the 1410 and 7010 on Models 145 and 155 


Modular Outline 

Partition Size.198 

Source Statement Litrary.198 

Macros.198 

Delete Statements .198 

Relocatable Library.198 

Linkage Edit Statements .199 

Delete Statement.199 

Cere Image Library .199 

Transients.199 

Phases.199 

Delete Statements.199 

Sample Program .199 

Sample Program Summary .199 
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The 1410/7010 Emulator Program consists of A.IIRIU 
a group of rracro instructions and object A.IIROJ 

and load modules that are shipped in the A.MCPU 

source statement, relocatable, and core A.MIO 

image libraries. A sample program that 
tests the working of a 1410 and 7010 
program under the emulator is contained in 
the source statement library under the name 
Z.EMSPL10. The source cards of this 


program are cataloged under the name Delete Statements 

Z. EMSPL10S. ' .’ 

DELETS A.ARUM 
EELETS A.EEIL 

PARTITION SIZE DELETS A.EIFLAG 


28,672 bytes. For further information, 

refer to the emulator publication listed in 

the Preface. A.MIO 
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L ink a ge E dit Statements 


IIRCE 

IIROF 


Tape Preprocessor Program 


PHASE phasename,*,NCAUTC 
INCLUDE IIRMTP 
INCLUDE IIRPRE 
ENTRY IIRPRE 

/* 

// LBLTYP TAPE 
// EXEC LNKEET 


Tape postprocessor Program 


PHASE phasename,*,NOAUTO 
INCLUDE IIRMTP 
INCLUDE IIRPOST 
ENTRY IIRFOST 


// LBLTYP TAPE 
// EXEC LNKEET 


IIROG 

IIROH 

IIRCI 

IIROK 


Eelete Stateme nts 


DELETC IIRC.ALL 
EELETC $ $EIIRBD 
DELETC $$EIIRBS 
EELETC $$EIIRMW 


EELETC $$EIIRT6 


Delete St ateme nt 

DELETR HR.ALL Sample_Prcgrarr 


CORE IMAGE LIBRARY 


Z.EMSPLl0, Z.EMSPL10S 


r- t- 1 

| Phases | Blocks | 


Transients 

1 

-4- - 

10 

~4- 

1 

- i - 

10 

Phases 

T 

1 

8 

T 

1 

9 


_J_ 


. r . 



T ransient s 


$$EIIRBD 
$ $BIIRBS 
$$EIIRMW 
$$BIIRSD 
$$EIIRT1 


SAMPLE PROGRAM SUMMARY : Figure 3-1 
illustrates the card deck is punched when 
the sample program is retrieved from the 
source statement library. 


r-n 

| Cards Retrieved | 


V - ^ 

| CATALS Z.EMSPL10,4.0 | 

j BKEND Z.EMSPLl0 j 

| 1400 object decks and source decks | 

| BKEND | 

j CATALS Z.EMSPLl0S f 4.0 | 

| BKEND Z.EMSPLlOS | 

| 1400 source deck | 

| BKEND I 

L_J 


$$BIIRT2 

$$EIIRT3 

$$BIIRT4 

$$EIIRT5 

$$BIIRT6 


Phases 


IIROC 

IIRCD 


Figure 3-1. Sample Program Card Deck, 
1410/7010 Emulator 

The sample program lists 20 records on 
the printer. If a tape is available and 
assigned, the sample program writes out the 
records on tape. For a complete 
description of the sample programs, refer 
to the 1410/7010 Emulator manual listed in 
the P reface . 
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Module 4: Compiler IOCS Modules--370N-IO-476 


Modular Outline 


Relocatable Module Naming Conventions .202 


CEMOC.203 

For CMBND Files.203 

EAMOE.205 

DIMOD.206 

ISMOD.20 6 

MTMOC.207 

System I/C Modules.208 

PRMOD.209 

SDMOD.210 

Name List for Workfile Type Modules 

(TYPEFLE =WCRK).211 

System I/O Modules.211 

Required IOCS Modules.212 


Modular Index 


ANS COBOL modules 

blocks, number of 202 
modules, number of 202 

CDMOD (card modules) 203 

COBOL modules 

blocks, number of 202 
modules, number of 202 

DAMOD (direct access modules) 205 

DIMOD (device independent modules) 206 

ISMOD (index sequential modules) 206 

macros, IBM-supplied 
CDMOD 203 
DAMOD 205 
DIMOD 206 
ISMOD 206 
MTMOD 207 
PRMOD 209 
SDMOD 210 

magnetic tape module (MTMOD) 207 

MTMOD (magnetic tape modules) 207 


PL/I (D) modules 

blocks, number of 202 
modules, number of 202 
printer modules (PRMOD) 209 


relocatable library 

blocks, number of 202 
modules, number of 202 
required IOCS modules 

blocks, number of 202 
main storage bytes 212 

modules, number of 202 

names 212 
RPG modules 

blocks, number of 202 
modules, number of 202 


SDMOD (sequential DASD modules) 210 
SDMODxx for workfile modules 211 
sequential DASD modules (SDMOD) 210 
system I/O modules 212 
MTMOD 208 
SDMOD 211 


naming conventions, relocatable 
modules 202 
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Module 4 indicates the names of the preassemfcled modules shipped by IBM 
in the relocatable library, their sizes in bytes, their external storage 
requirements in library blocks, and the compilers that create linkage 
for their use. No IOCS modules are required fcr FORTRAN or Basic 
FORTRAN. An x in a column headed by a compiler indicates that the 
particular module may be linked by that compiler tc the problem program. 
For example, an x in the columns headed by COBOL and PL/I (D) indicates 
that COBOL and PL/I (D) link the module so identified. Fcr assembler 
language programs, the user can preassemble IOCS modules as described in 
the DOS S uper visor and I/O Macrcs publication. Note that separate 
modules are not assembled for DTFCN or DTFSR. 


The preassembled modules named in this module can be used by any 
other problem program whenever applicable. 





Modules 

Blocks 




223 

1247 

Am. Nat. St. 

COBOL 


132 

864 

Am. Nat. St. 

COEOL 

& COBOL 

158 

1053 

Am. Nat. St. 

COBOL 

6 RPG 

159 

1032 

Am. Nat. St. 

COBOL 

S PL/I (D) 

163 

970 

Am. Nat. St. 

COBOL, 

COBOL S PL/I (D) 

341 

1134 

Am. Nat. St. 

COEOL, 

COBOL S RPG 

171 

1081 

Am. Nat. St. 

COBOL, 

PL/I (D) & RPG 

186 

1127 

Am. Nat. St. 

COBOL, 

PL/I (E), RPG £ COBOL 

194 

1161 

COBOL 



77 

548 

COEOL S PL/I 

(D) 


107 

662 

COBOL 6 RPG 



93 

595 

COEOL, PL/I 

(D) S RPG 

116 

675 

PL/I (D) 



70 

400 

RPG 



43 

298 

RPG & PL/I (D) 


98 

612 

Required IOCS Modules 

27 

84 


N ot e: Certain preassembled IOCS modules are required when cataloging 

IBM components to the core image library. Eo not delete these 
modules from the relocatable library until after all the IBM 
components you desire have been cataloged tc the core image 
library. The modules are found in Require d IOCS M odules. 


Relocatable Module Naming Conventions 


Each module name begins with a 3-character prefix and consists of a 
5-character field corresponding tc the option permitted in generation cf 
the module. The following 3-character prefixes identify the 
preassembled IOCS modules shipped by IBM: 

IJC I/C Card (CDMOD) 

IJD I/O Printer (PRMOE) 

IJF I/O Magnetic Tape (MTMOD) 

IJG Sequential Direct Access (SDMOD) 

IJH Index Sequential Direct Access (ISMOE) 

IJI Direct Access Method (DAMOD) 

IJJ Device Independent Access Method (DIMOD) 
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CDMOD 


CDMCD naire = IJCabcde 

a = F RECFCRM=FIXUNB (always for INPUT and CMBND files) 
= U RECFCRM=UNDEF 
= V RECFCRM=VARUNB 

t = A CTLCHR=ASA (not specified CMBND) 

= C CONTRCL=YES 
= Y CTLCHR=YES 

= Z neither CTLCHR nor CCNTRCL is specified 

c = B RDONLY=YES and TYPEFLE=CMBND 
= C TYPEFLE =CMBND 

= H RDONLY=YES and TYPEFLE=INPUT 
= I TYPEFLE=INPUT 

= N RDONLY=YES and TYPEFLE=OUTPUT 
= O TYPEFLE=OUTPUT 

d = B WORKA=YES and IOAREA2=YES 
= I IOAREA2=YES 
= W WORKA=YES 

= Z neither WORKA nor IOAREA2 is specified 


For CMEND Files 


d = W WORKA=YES 

= Z WORKA is not specified 


e 


0 

1 

2 

3 

4 

5 

6 
7 
A 
B 
C 
D 
E 


DEVICE=2540 
DEVICE=1442 
DEVICE=2520 
DEVICE=2501 
DEVCIE=2540 
DEVICE=2520 
DEVICE=3505 
DEVICE=3525 
DEVICE^ 3525 
DEVICE=3525 
DEVICE= 3525 
DEVICE=3525 
DEVICE= 3525 


or DEVICE=2596 

and CRDERR is specified 
and CRDERR is specified 

and FUNC emitted, FUNC=R cr FUNC=P 

and FUNC=RP 

and FQNC=RW 

and FUNC=PW 

and FUNC=I 

and FUNC=RPW 


CDMOD 

Names 

COBOL 

PL/I (D) 

RPG 

Am. Nat. St. 
COBOL 

Bytes cf 

Main 

Storage 

IJCFAOI0 





116 

IJCFAOI1 

X 

X 


X 

152 

IJCFAOI2 

X 

X 



156 

IJCFAOI4 

X 

X 


X 

264 

IJCFAOI5 

X 



X 

248 

IJCFAOZO 





92 

IJCFAOZl 

X 

X 


X 

128 

IJCFAOZ2 


X 



132 

IJCFAOZ4 

X 

X 


X 

248 

IJCFAOZ5 

X 



X 

224 

IJCFCCZO 



X 


218 

IJCFCCZ1 



X 


132 
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CDMOD 

Names 

COEOL 

PL/I (D) 

RPG 

Bytes of 

Air. Nat. St. Main 

COBOL Storage 

IJCFCCZ2 



X 


218 

IJCFCIZO 



X 


158 

IJCFCIZ1 



X 


132 

IJCFCIZ2 



X 


158 

IJCFYOI0 



X 


96 

IJCFYOI1 


X 

X 


132 

IJCFYOI2 


X 

X 


136 

IJCFYOI4 


X 



248 

IJCFYOZO 



X 


72 

IJCFYOZ1 


X 

X 


108 

IJCFYOZ2 


X 

X 


112 

IJCFYOZ4 


X 



224 

IJCFZIIO 

X 

X 

X 

X 

136 

IJCFZIIl 

X 

X 

X 

X 

140 

IJCFZII2 

X 

X 

X 

X 

136 

IJCFZII3 

X 

X 

X 

X 

136 

IJCFZIZO 

X 

X 


X 

104 

IJCFZIZ1 

X 

X 


X 

108 

IJCFZIZ2 

X 

X 


X 

104 

IJCFZIZ3 

X 

X 

X 

X 

104 

IJCFZOI1 

X 

X 


X 

116 

IJCFZOI2 


X 



124 

IJCFZOI4 

X 

X 


X 

232 

IJCFZOI5 

X 



X 

216 

IJCFZOZl 

X 

X 


X 

74 

IJCFZOZ2 


X 



80 

IJCFZOZ4 

X 

X 


X 

208 

IJCFZOZ5 

X 



X 

192 

IJCUAOIl 




X 

164 

IJCUAOI4 




X 

280 

IJCUAOI5 




X 

264 

IJCUAOZl 




X 

140 

IJCUAOZ4 




X 

256 

IJCUAOZ5 




X 

240 

IJCUZOI1 




X 

124 

IJCUZOI4 




X 

240 

IJCUZOI5 




X 

224 

IJCUZOZ1 




X 

104 

IJCUZOZ4 




X 

224 

IJCUZOZ5 




X 

200 

IJCVAOI1 




X 

180 

IJCVAOI4 




X 

296 

IJCVAOI5 




X 

280 

IJCVAOZl 




X 

156 

IJCVAOZ4 




X 

272 

IJCVAOZ5 




X 

256 

IJCVZOI1 




X 

152 

IJCVZOI4 




X 

272 

IJCVZOI5 




X 

248 

IJCVZOZ1 




X 

128 

IJCVZOZ4 




X 

248 

IJCVZOZ5 




X 

224 
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DAMOD 


DAMOD name = IJIabcde 

a = B RECFORM=UNDEF (handles both (JNDEF and FIXUNE) 
= F RECFORM=FIXUNE 

= S RECFORM=SPNUNB 

= V RECFORM=VARUNB 

b = A AFTER=YES 

= Z AFTER is not specified 

c = E IELOC=YES and FEOVE=YES 
= I IDLOC =YES 

= R FEOVD=YES 

= Z neither is specified 

d = H ERREXT=YES and RELTRK=YES 

= P ERREXT=YES 

= R RELTRK=YES 

= Z neither is specified 

e = W HOLD=YES and RDONLY=YES 
= X HOLE=YES 

= Y RDONLY=YES 

= Z neither is specified 


DAMOD 

Names 

COEOL 

PL/I (D) 

Am. Nat. St. 
RPG COBOL 

Bytes cf 

Main 

Storage 

IJIEAIRZ 



X 

1632 

IJIBAIZZ 

X 


X 

1220 

IJIEAZRZ 



X 

1220 

IJIEAZZZ 

X 


X 

1012 

IJIBZIRZ 



X 

1416 

IJIEZIZZ 

X 


X 

1004 

IJIBZZRZ 



X 

1004 

IJIEZZZZ 

X 


X X 

796 

IJIFAIRZ 



X 

1532 

IJIFAIZZ 

X 


X 

1120 

IJIFAZRZ 



X 

1148 

IJIFAZZZ 

X 

X 

X 

940 

IJIFZIRZ 



X 

1228 

IJIFZIZZ 

X 


X 

816 

IJIFZZRZ 



X 

848 

IJIFZZZZ 

X 

X 

X 

636 

IJISAIRZ 



X 

3684 

IJISAIZZ 



X 

3640 

IJISAZRZ 



X 

3324 

IJISAZZZ 



X 

3324 

IJISZIRZ 



X 

2680 

IJISZIZZ 



X 

2636 

IJISZZRZ 



X 

2320 

IJISZZZZ 



X 

2320 
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DIMOD 


DIMOD name = IJJabcde 
a = F RECFORM=FIXUNB 

b = C always 

c = B rYPEFLE=OUTPUT (processes both input and output) 
= I TYPEFLE=INPUT 

d = I IOAREA2=YES 

= Z IOAREA2 is n ot specified 

e = C RDCNLY=YES 

= D RDCNLY is not specified 


DIMOD 

Names 

PL/I (D) 

Bytes of 

Main 

Storage 

IJJFCBID 

X 

775 

IJJFCBZD 

X 

691 

IJJFCIID 

X 

386 

IJJFCIZD 

X 

326 


N ote : See R equired IOCS Modu les before deleting ircdules with the IJJ 

prefix. 


ISMOD 


ISMOD name = IJHabcde 

a = A RECFORM=BOTH and IOROUT=ADD or ADDRTR 
= B RECFCRM=FIXBLK and ICEOUT=AED or ADERTR 
= U RECFORM=EIXUNB and IOROUT=ADD or ADDRTR 
= Z RECFORM is no t specified and IOROUT=LGAE or RETRVE 

b = A IOROUT=ADDRTR 
= I IOROUT=AEE 
= L IOROUT-LOAD 
= R IOROUT=RETRVE 

c = B TYPEFLE=RANSEQ 

= G IOAREA2=YES and TYPEFLE=SECNTL or IGROUT=LOAD 
= R TYPEFLE=RANDOM 
= S TYPEFLE=SECNTL 

= Z neither is specified and IOROUT=LOAD cr ADD 

d = B CORINDX=YES and HOLD=YES 
= C CORINEX=YES 
= O HOLD=YES 
= Z neither specified 

e = F CORDATA=YES, ERREXT=YES , and RDONLY=YES 
= G CORDATA=YES and ERREXT=YES 
= O CORDATA=YES and RDONLY=YES 
= P CORDATA=YES 
= S ERREXT=YES and RDONLY=YES 
= T ERREXT=YES 
= Y RDONLY=YES 
= Z nothing is specified 
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ISMOD 

Names 

COEOL 

PL/I (D) 

RPG 

Air. Nat. St. 
COBOL 

Bytes of 

Main 

Storage 

IJHAABCP 




X 


IJHAABCZ 




X 


IJHAABZP 




X 


IJHAABZZ 

X 


X 


4802 

IJHAARCP 

X 

X 


X 

4570 

IJHAARCZ 

X 

X 


X 

4198 

IJHAARZP 

X 

X 


X 

4288 

IJHAARZZ 

X 

X 

X 

X 

3916 

IJHAASZZ 

X 


X 


4090 

IJHAIZZZ 

X 


X 


3196 

IJHEABCP 




X 

5208 

IJHEABCZ 




X 

4836 

IJHBABZP 




X 

4930 

IJHEABZZ 

X 


X 

X 

4558 

IJHBARCP 

X 

X 


X 

4326 

IJHEARCZ 

X 

X 


X 

3950 

IJHBARZP 


X 


X 

4048 

IJHEARZZ 

X 

X 

X 

X 

3672 

IJHBASZZ 

X 


X 


3844 

IJHEIZZZ 

X 


X 


2950 

IJHUABCP 




X 

4940 

IJHUABCZ 




X 

4624 

IJHUABZP 




X 

4658 

IJHUABZZ 

X 


X 

X 

4342 

IJHUARCP 

X 

X 


X 

4058 

IJHUARCZ 

X 

X 


X 

3738 

IJHUARZP 

X 

X 


X 

3776 

IJHUARZZ 

X 

X 

X 

X 

3456 

IJHUASZZ 

X 


X 


3630 

IJHUIZZZ 

X 


X 


2736 

IJHZLZZ 

X 

X 

X 

X 

823 

IJHZRBCZ 




X 

2550 

IJHZRBZZ 

X 


X 

X 

2374 

IJHZRRCZ 

X 

X 


X 

1668 

IJHZRRZZ 

X 

X 

X 

X 

1492 

IJHZRSZZ 

X 

X 

X 

X 

1234 


MTMOD 


MTMOD name = IJFabcde 

a = F RECFORM=FIXUNB or FIXELK 

= S RECFORM=SPNUNB or SPNELK 

= U RECFGRM=UNDEF 

= V RECFORM=VARUNB or VARELK 

= N RECFCRM=UNDEF and ASCII=YES 

= R RECFORM=VARUNB or VARELK, and ASCII=YES 

= X RECFCRM=FIXUNB or FIXELK, and ASCII=YES 

b = B READ=EACK 

= Z READ=FORWARD, or READ is net specified 
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C = C CKPTREC =YES 

= Z CKPTREC is no t specified 


d = w WORKA=YES is specified 
= Z WORKA is not specified 


e = M ERREXT=YES and RDONLY=YES 
= N ERREXT=YES 
= Y RDONLY=YES 
= Z neither is specified 


MTMOD 

Names 

COEOL 

PL/I (D) 

RPG 

Am. Nat. St. 
COBOL 

Bytes of 

Main 

Storage 

IJFFBCZZ 

X 




904 

IJFEBZZN 




X 

880 

IJFFBZZZ 


X 



784 

IJFFZCZZ 



X 

X 

784 

IJFFZZZZ 


X 


X 

688 

IJFSZZWN 




X 

2104 

IJFUBCZZ 

X 




696 

IJFUBZZZ 


X 



576 

IJFUZZZN 




X 

656 

IJFUZZZZ 


X 


X 

560 

IJFVBCWZ 

X 




1128 

IJFVBCZZ 

X 




1000 

IJFVZCWZ 



X 


1064 

IJFVZZZN 




X 

920 

IJFVZZZZ 


X 


X 

824 


Name list for workfile type modules (TYPEFLE=WORK): 

MTMOD name = IJFabcde 

a = W always 

b = E ERROPT=YES 

= Z ERROPT is not specified 

C = N NOTEPNT=YES 
= S NOTEPNT=POINTS 
= Z NOTEPNT is not specified 

d = Z always 

e = M ERREXT=YES and RDONLY=YES 
= N ERREXT=YES 
= Y RDONLY=YES 
= Z neither is specified 


System I/O Module s 


IJFWEZZZ 
IJFfoZNZZ 
IJFWZZZZ 

N ote ; See Re quired IOCS Mo d ule s before deleting ircdules with the IJF 
prefix. 
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PRMOD 


PRMOD name = IJDabcde 

a = F RECFCRM=FIXUNB 
= V RECFCRM=VARUNB 
= U RECFCRM=UNDEF 

b = A CTLCHR=ASA 

= Y CTLCHR=YES 

= C CONTRCL=YES 

= S STLIST=YES 

= Z neither CTLCHR nor CCNTPCI nor STLIST is specified 

c = B ERROPT=YES (ERROPT=name in DTFPR) and PRINTCV=YES 

= P PRINTCV=YES, DEVICE is net a 3525, and ERRCFT is net specified 
(ERRCPT=RETRY or omitted in DTFPR) 

= I PRINTCV=YES, DEVICE=3525, and FUNC=W T cr Ciritted 
= F PRINTCV=YES, DEVICE=3525, and FUNC=RW T 

= C PRINTCV=YES, DEVICE=3525, and FUNC=PK T 

= D PRINTCV=YES, DEVICE=3525, and FUNC=RPW T 

= Z neither ERROPT (ERROPI=RETRY or oiritted in DTFPR) nor PRINTCV is 
specified, and DEVICE is not a 3525 

= 0 PRINTCV=YES is not specified, DEVICE=3525 and FUNC=W T or omitted 

= R PRINTOV=YES is not specified, DEVICE=3525 and FUKC=RW T 

= S PRINTOV=YES is not specified, DEVICE=3525 and FUEC=PW T 

= T PRINT'OV =YES is not specified, DEVICE=3525 and FUEC=RPW T 

= E ERROPT=YES (ERROPT=naire in DTFPR) and PRINTCV=YES is not specified 

d = I I0AREA2=YES 

= Z IOAREA2 is no t specified 

e = V RDONLY=YES and WORKA=YES 
= W WORKA=YES 

= Y RDONLY=YES 

= Z neither is specified 


PRMCD 

Names 

COBOL 

PL/I (D) 

Am. Nat. St. 
RPG COBOL 

Bytes cf 

Main 

Storage 

IJDFAPIZ 

X 


X 

280 

IJDFAPZZ 

X 


X 

268 

IJDFAZIZ 


X 


220 

IJDFAZZZ 


X 


196 

IJDFYPIZ 



X 

152 

IJDFYPZW 

X 


X 

146 

IJDFYPZZ 

X 


X 

140 

IJDFYZIZ 


X 


96 

IJDFYZZZ 


X 


72 

IJDFZPIZ 

X 

X 

X 

152 

IJDFZPZZ 

X 

X 

X 

118 

IJDUAPIZ 



X 

292 

IJDUAPZZ 



X 

280 

IJDUYPIZ 



X 

164 

IJDUYPZZ 



X 

152 

IJDUZPIZ 



X 

160 

IJDUZPZZ 



X 

148 

IJDVAPIZ 



X 

312 

IJDVAPZZ 



X 

296 

IJDVYPIZ 



X 

184 

IJDVYPZZ 



X 

168 

IJDVZPIZ 



X 

188 

IJDVZPZZ 



X 

17 2 
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SDMOD 


SDMODxx name = IJGabcde 

a = C RECFORM=FIXUNB or FIXELK and HOLD=YES 

= F RECFORM=FIXUNB or FIXELK and HOLD is net specified 

= P RECFORM=SPNUNB or SFNELK and HOLD=YES 

= Q RECFORM=SPNONB or SPNBLK and HOLD is net specified 

= R RECFORM=UNDEF and HOLD=YES 

= S RECFCRM=VARUNB or VARELK and HOLD=YES 

= U RECFORM=UNDEF and HOLD is net specified 

= V RECFORM=VARUNB or VARELK and HOLD is net specified 

b = I SDMODxI 
= O SDMODxO 
= 0 SDMODxU 

c = C ERROPT=YES and ERREXT=YES 
= E ERROPT=YES 
= Z neither is specified 

d = M TRUNCS=YES and FEOVD=YES 

= T TRUNCS=YES 
= W FEOVD=YES 
= Z neither is specified 

e = B CONTROL=YES and RDONLY=YES 
= C CONTROL=YES 
= Y RDONLY=YES 
= Z neither is specified 


SDMOD 

Names 

COEOL 

PL/I (D) 

Air. Nat. St. 
RPG COBOL 

Bytes of 

Main 

Storage 

IJGFIETZ 

x 

X 


746 

IJGFIEWZ 



X 

670 

IJGFIEZZ 

X 

X 


614 

IJGFIZZZ 

X 


X 

470 

IJGFOEWZ 



X 

718 

IJGFOEZZ 


X 


630 

IJGFOZZZ 

X 


X 

566 

IJGFUETZ 


X 


1102 

IJGFUEWZ 



X 

1054 

IJGFUEZZ 


X 


998 

IJGFUZZZ 

X 


X 

834 

IJGQIEWZ 



X 

1157 

IJGQIEZZ 



X 

1113 

IJG0OEWZ 



X 

2409 

IJGQOEZZ 



X 

2317 

IJGQUEWZ 



X 

2662 

IJGQUEZZ 



X 

2598 

IJGUIEWZ 



X 

6 85 

IJGUIEZZ 

X 

X 


641 

IJGUIZZZ 

X 



541 

IJGUOEWZ 



X 

801 

IJGUOEZZ 


X 


721 

IJGUOZZZ 

X 



653 

IJGUUEWZ 



X 

1153 

IJGUUEZZ 


X 


1097 
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SDMOD 

Names 


COEOL 


Bytes of 

Main 

Storage 


( 


Air. Nat. St. 
PL/I (D> RPG COBOL 


IJGUUZZZ 

X 




949 

IJGVIEWZ 




X 

785 

IJGVIEZZ 

X 

X 



741 

IJGVIZZZ 

X 


X 


637 

IJGVOEWZ 




X 

1229 

IJGVOEZZ 


X 



1137 

IJGVOZZZ 

X 


X 


1065 

IJGVUEWZ 




X 

1346 

IJGVUE Z Z 


X 



1282 

IJGVUZZZ 

X 


X 


1106 


N AME LIST FOR W ORKFIL E TYPE M ODULES ( TYPEFLE=WCRK ) 

SDMGDxx name = IJGabcde 

a = T SDMODW specifies HOLB=YES 

= W SDMODW does not specify HOLE=YES 

b = C ERROPT=YES and ERREXT=YES 
= E ERROPT=YES 
= Z neither is specified 

c = N NOrEPNT=YES 

= R NOTEPNT=POINTRW 
= Z NOTEPNT is not specified 

d = C CONTROL=YES 

= Z CONTROL is not specified 

e = T RDONLY=YES and UPDATE=YES 
= U UPDATE=YES 
= Y RDONLY=YES 
= Z neither is specified 


S yste m I/O Module s 


IJGWEZZU 
IJGWEZZZ 
IJGWZNZZ 
IJGWZRZZ 

N ote : See R equired IOCS Modul es before deleting modules with the IJG 
prefix. 
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Required IOCS Modules 


The following preassembled IOCS ircdules are required when cataloging and/or 
linkage editing IBM components to the core image library. 

Module Bytes of 

Names Main Storage 


IJFWEZZZ 

280 

I JFViZNZZ 

424 

IJFWZZZZ 

232 

IJGFIETZ 

746 

IJGWEZZU 

868 

IJGWEZZZ 

796 

IJGWZNZZ 

902 

I JGViZR ZZ 

840 

IJJCPAlN 

621 

IJJCPDV 

533 

IJJCPDV1 

477 

IJJCPDV2 

214 

IJJCPDO 

569 

IJJCPDON 

513 

IJJCPD1 

501 

IJJCPD1N 

445 

IJJCPD2 

282 

IJJCPD3 

202 

IJJCPV 

343 

IJJCPV1 

271 

IJJCPV2 

68 

IJJCPO 

389 

IJJCPON 

317 

IJJCP1 

311 

IJJCP1N 

239 

IJJCP2 

128 

IJJCP3 

58 
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Module 5: Direct Access --370N-IO-454 


Modular Outline 


Source Statement Library.214 

File Definition Macros.214 

Storage Requirements.214 


DTFDA (Define The File: Direct 
Access Device) Table Requirements .214 
DAMOD (Direct Access Device Module) 215 
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1 


r- 

j Number of 
j Macros 

b - 

I 3 

L_ 


T- 

j Source Statement 
[ Library Blocks 

f- 

| 883 

.x_ 


1 


SOURCE STATEMENT L IBR ARY 
F il e Defi n iti o n Macro s 


A.DAMOD 

A.EAMODV 

A.DTFDA 

STORAGE REQUIREME NT S: 

Figure 5-1 defines the storage requirements fcr BAMOD. The following are 
the storage requirements for DTFDA. 


DTFEA_( De f ine The File: _ Dir ec t A c ce s s Device) Table Requirement s 

RECFORM=FIXUNB requires 205-225 bytes, depending upon imperative macros 
used in the DTF. 

VERIFY=YES requires 40-80 bytes, depending upon imperative macros used 
in the ETF. 

AFTER=YES requires 80 additional bytes. 


RECFORM=SPRUNB requires 282-378 bytes, depending upon the imperative macros 
used in the ETF. 

VERIFY=YES requires 64-72 additional bytes, depending upon the 
imperative macros used in the ETF. 

AFTER= YES requires 88 additional bytes. 


RECFORM=UNDEF requires 265-285 bytes, depending upcn the imperative macro 
used in the ETF. 

VERIFY=YES requires 40-80 additional bytes, depending upon the 
imperative macros used in the DTF. 

AFTER=YES requires 16 additional bytes. 


RECFORM=VARUNB requires 216-330 bytes, depending upon the imperative macros 
used in the ETF. 

VERIFY=YES requires 64-72 additional bytes, depending upon the 
imperative macros used in the DTF. 

AFTER=YES requires 88 additional bytes. 

Relative addressing increases the size of the DTF 60-80 bytes plus 8 bytes 
per extent. (See DOS Sup e rvisor and I /O M acros .) 
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DAMQD (Di rect A ccess De vice Mod ule ) 

r- 1 

J Formatting j 

| Module J 

r-T-T-1--+-T-T-T-1 

I III I AFTER I II | 

| j Basic I | | and | | j I 

| RFCFORM= | Module | IDLOC | AFTER | IDLCC | REITRK j HOLD | ERREXT j 

j.--j--4--j--j-4-4-4-"1 

| FIXUNB | 636 | +180 | +304 | +484 | +212 | +84 j +28 | 

j.-1-4-4-4-4-4-4--i 

| UNDEF I 796 | +208 | +216 | +426 | +208 | +88 | +28 | 

j.-4-1-4--i-4-4-4--i 

| VARUNB | 686 | +210 | +298 | +508 | +226 | +84 | +34 | 

j.-4-4-4-4-4-4-4--i 

j SFNUNE | 2320 | +316 | +1004 | +1320 | | +104 | +32 j 

L-X-X-J-J-X_X_X_J 


Notes: 

1. Basic Module includes coding to handle either FIXUNB or UNDEF records and the 
WRITEKY, READKEY, READIE, WRITEID, SRCHM, VERIFY, and CONTROL functions. 

2. AFTER includes coding to create the file and to handle the RZERO option. 

3. IDLCC includes coding to return the record identifier to the user in a location 
he specifies. 

4. Specification of trailer label processing in the DTF increases the size of each 
module by 50 ± 20 bytes. 

5. RDCNLY=YES changes the size of the module -50 tc +50 bytes. In addition, the 
user's program must provide a 72-byte save area each time the module is 
reentered. 

6. RELTRK may be specified for SPNUNB records. This specification requires no 
additional bytes. 

Figure 5-1. DAMOD—Main Storage Requirements 
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Module 6: Index Sequential — 370N-IO-457 


Modular Outline 


Source Statement Library.218 

Macros.218 

File Definition.218 

Imperative . ..218 

Storage Requirements.218 


DTFIS (Define The File Indexed 
Sequential) Table Requirements . . .218 
ISMOD (Indexed Sequential Module) .219 
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Number cf 
Macros 

T 

1 

1 

1 

Source Statement 
Library Blocks 

19 

T 

1 

1772 


J. 



SOURCE STATEMENT LIBRARY 


Macros 


FILE DEFI NITION 


A.DTFIS 
A.DTFISl 
A.BTFIS2 
A.DTFIS3 
A.ISMOD 


A.ISMODO 
A.ISMODl 
A.ISMOD2 
A.ISMOD3 
A.ISMOD4 

A. ISMOD5 
A.ISMOD6 
A. ISMOD7 
A.ISMOD8 
A. ISMOD9 


IMPERAT IVE 


A.ENDFL 
A.ESETL 
A.SETFL 
A.SETL 


S tor age Requi r ement s 


Figure 6-1 defines the storage requirements for EIMOD. The storage 

requirements for DTFIS are: 

DTFIS (De f ine The File Indexed Sequ en tia l) Table Requirement s: 

1. IOROUT=LCAD requires 248 bytes plus 4 fcytes per disk extent 
specified, plus 8 fcytes for I0AREA2. 

2. IOROUT=AED requires 530 bytes plus 4 bytes per disk extent specified 
plus KL (the length of the key). 

3. IOROUT=RETRVE requires 276 fcytes plus 4 bytes per disk extent 
specified, when TYPEFLE=SEQNTL. 

4. IOROUT=RETRVE requires 292 fcytes plus 4 bytes per disk extent 
specified when TYPEFLE=RANDOM or RANSEQ. 

5. IOROUT =ADDRTR requires 548 bytes plus 4 bytes per disk extent 
specified plus KL (the length of the key). 

6. IOROUT=AEERTR, TYPEFLE=RANDOM, INDAREA=name, and INDSIZE=n require 
572 bytes plus 4 bytes per disk extent. 
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I SMOD (Indexe d Sequential Module) 

r 





IOROOT= 





__ 

LOAD 

T - 


. 1 

1 

- 4 - T - 

ADD 

T 



T 


I 


1ERREXT jIOAREA2 |ERREXT | 

j | | *--J | 

I i I |ICAREA2 j j 

r-i-4-4-4-4-f- 

|RECFORM= || | | |j 

-4-4-4-4-4- 


I 1 1 

|CORDATA jERREXT |HOLD 


I t I 

-4-4-4 


T 

I 
i 

| |HOLD | 

I ^-^ 

|COREATA JCORDATA j 

|-- 4 --I 

|ERREXT |ERREXT | 
+- 4 - 


FIXUNB 

1 

- 4- 

1 

-4- 

1 

_ X 

1 

-L 

|2608 

1 + 184 

4 

1+476 

| +194 

1 +66 C 
j 

1 +854 

j 

FIXBLK 

T 

1 

t 

1 

_4 

1 

1 

_ 4 

1 

1 

4 

| 2822 

| +272 

4 

| +498 

1 +18 6 

i +770 
j . 

| +956 

BOTH 

j 823 

j +224 
_X 

i +212 

_ X 

| +436 

X 

j 3068 

j +246 

-X 

i +428 

X 

j +210 

j +674 
-X 

1 +884 

X 


Figure 6-1. ISMOD Main Storage Requirements (Part 1 of 5) 


ICROUT=RETRVE 
TYPEFLE= 


RANDOM 

-T- 


SEQNTI 


RAKSEQ 


ERREXT 


HOLE 


"T-T-1- 

| ERREXT | IOAREA2 | HOLD 


ERREXT 


T-"i 

1 HOLD| 




IRECFORM 

|- - 

|FIXUNE 

1 -- 

|FIXBLK 

I-- 

| BOTH 

L_ 


-4-4- 

I I 

-4-4- 


i|| | 


I i I 

- 4 - 4 - 4 - 

i I i 


-4--1 

I i 

-4--I 


■1-f-4-1--4-4- 

1304 I +302 I +156 | 1326 | +246 | +836 

x-x_x-x-x-x- 


■4-4-4-4--I 

| +104 I 2186 I +332 | +2 36 J 

.X-X_X-X_J 


Figure 6-1. ISMOD Main Storage Requirements (Part 2 of o) 


| IORCUT-ADDRTR 

j.- 

j TYPEFLE= 

j.- T - 

| RANDOM j SEQNTL 

\ - T - T -T-T- 4 -T-r-T-r- 

j JCORDATA IERREXT jCORDATA |HOLD | JCORDATA |IOAREA2 jHOLE JERREXT 

j | j k -^ I | i II 

| J | |ERREXT 111 | II 

r -4-4-4-4-4-4-4-4-4- 4 - 

JRECFORM || || 111 I II 

|FIXUNB J3252 |+320 J+534 \+718 J+304 13502 |+94 |+386 |+278 |+510 

[fIXBLK |3468 {+376 {+554 |+826 J+304 |3716 |+272 |+386 J+278 J+528 

[both {3712 { + 372 {+588 j +834 |+320 J3962 J+274 j + 386 j+294 |+558 

L_X_X_X-L-X-X-X-X-X-X- 


I 

4 

I 

4 

I 

4 


—i 
I 

-H 

I 

-H 

1 

-H 

I 


Figure 6-1. ISMOD Main Storage Requirements (Part 3 of 5) 
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r-! 

| IOROUT=ADDRTR | 

f-J 

| T'YPEFLE—RANSEQ | 

(--T-r-T-T--1 

| |CORDATAIERREXT|CCRBATA|HOLE| 

| | | |--J j 

r-1 I I | ERREXT | | 

|RECFORM= || || || 

h-"I-4-f-i-4-■! 

j FIXUME |426 61 +316 | +556 | +750 |+384| 

j.-4-1--j-4-i--j 

j FIXBLK |4494| +372 | +584 | +856 | + 384 j 

h-4-4-4-4-4--f 

| BOTH J 47261 +248 | +616 | +864 |+4001 

■ _x_ x _j -x- J -j 


Figure 6-1. ISMOD Main Storage Requirements (Part 4 cf t>) 


Note 1: when RECFORM=BOTH is specified, the 
rrcdule processes FIXUNB and FIXBLK 
records. 

Note 2: For CORINDX = YES, add 212 bytes. 

Note 3: RDCNLY=YES changes the rrcdule size by 
±50 bytes with the following 
exceptions. When IORCUT=ADD cr 
ICROUT=ADDRTR, the module changes in 
size +60 to +100 bytes. In addition, 
the user's program must provide a 
72-byte save area each time the module 
is reentered, regardless of function. 


Figure 6-1. ISMOD Main Storage Requirements 
(Part 5 of 5) 


22’d DCS Version 4 System Generation 












7 


Module 7: Magnetic Reader — 370N-IO-477 


Modular Outline 

Core Image Library.222 

Transients.222 

Source Statement Library.222 

Macros.222 

File Definition.222 

Imperative.222 

SYSTEM GENERATION.222 

Sample Problems.222 

Storage Requirements.222 

DTFMR (Define The File Magnetic 
Character Reader) Table 

Requirements.222 

MRMOD (Magnetic Character Reader 

Module).222 

Sample Problems.222 

Sample Problem Summary.222 

SYSL03 Output Is.22 3 

SYSLST Output Summary.223 
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r --J 

| Libraries | 

j.- T -f 

| Core Ircage | Source | 

| | Stateirent | 

j.- T -4- T -f 

I j Elocks | | j 

| |-- T -t- \ I I 

|Transients|231112314/133301Macros|Blocks | 
I I 12319 !|| | 

j.-4—4-4—4-4- \ 

| 5 I 5 I 5 I 5 I 7 I 479 | 

L-X-X_X-X-X_J 


M RM OC (M a gnet i c Ch ar ac ter Reader Modul e) 

If ADDRES£=DUAL is specified, the irodule 
requires 1,050 bytes. 

If ADDRESS=DUAL is not specified, the 
module requires 946 bytes. 


S ample P roblem s 


CORE IMAGE LIBRARY 


Transients 


$$ANERRT Error Recovery Procedure 
$$ANERRW Error Recovery Procedure 
$ $BCMR 01 CLOSE 
$$BMMR20 Message Writer 
$$ECMR01 OPEN 


r 

1 

1 

T 

| Disk Extent 

L 

Number 


1 

| Phase 

r 

1 1 

T 

1 2 

T 

1 3 

■ T. . ' ' 

1 ^ 

\ - 

*4 

4 

4 

■4 

| ASSEMBLE 

I 

|SYSLNK 

1 

|SYS001 

|SYSCC2 

i 

|SYS003 

i 

i 

| LINKEDIT 

I 

i 

|SYSLNK 

I 

i 

|SYS001 

1 

1 

1 

| EXECUTE 

1 

1 

1 

1 

i 

i 

L 

.1 

X 

X 

-X 


Figure 7-1. MICR--Sairple Problem File 
Requirements 


SOURCE STATEMENT LIBRARY 


Macros 


FILE DEFINITION 


A.ETEMR 

A.MRMOD 

IMPERATIVE 

A.DISEN 
A.LITE 


SYSTEM GENERATION 


t -r- 1 

|Card Cols.jCard Cels. 
73-76 (77-80 

- + - 


(Cards Retrieved 

^- 

|CATALS Z.MCR1 
|EKEND Z.MCR1 
JMCR1 Source Deck 
| (71 Cards) 

|EKEND 

I 

|CATALS Z.MCR2 
|EKEND Z.MCR2 
|MCR2 Source Deck 
| (115 Cards) 

| BKEND 


$477 jCGCl-0071 


$477 | CCC1-011 5 

I 


A.SMICR 

Refer to system generation macros in the 
DOS S yste m Con tro l section. 

SAMPLE_PROELEMS 

Z.MCR1 
Z.MCR2 

STORAGE REQUIREME NTS 

D TF MR (Define T he Fil e Mag ne tic Ch ar a cte r 
Re ade r) T able R equir e ment s: 

If ADDRESS=DUAL is specified, the table 
requires 264 bytes. 

If ADDRESS=CUAL is not specified, the table 
requires 250 bytes. 


Figure 7-2. MICR--Sarrple Problem Card 
Decks 

SAMPIE_PRCELEM_SUMMARY: 

Figure 7-1 defines the files required for 
the KICR sample problems. Figure 7-2 shews 
the sample problem card decks retrieved 
from the source statement library. 

The first 1419 Magnetic Character Reader 
sample problem processes 500 documents from 
one magnetic character reader using GET 
lcgic. The documents are read intc pocket 
3 in groups of approximately 50. After 
each greup is read, the 1419 Magnetic 
Character Reader is disengaged, the batch 
number is updated, and the pocket light is 
turned on. All documents are listed on the 
printer. If the Selective Tape list 
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feature is present on the printer, the 
documents are listed on the leftmost tape. 
The controls on the magnetic character 
reader that must be pressed, if present, 
are: EATCH NUMBER ON, PROG SORT, and at 

least one field for the VALIDITY CHECK 6 
READ OUT control. 


The second 1419 Magnetic Character 
Reader sample problem processes 250 
documents frcm each of two magnetic 
character readers, (both of the same type: 
both with a single address adapter cr both 
with a dual address adapter), using READ, 
CHECK, and WAITF logic. The only controls 
that must be pressed are PROG SORT and at 
least one field for the VALIDITY CHECK, & 
READ OUT control. Documents frcm cne 
reader are selected into pockets one or 
zero depending on whether cr net the 
selected field is present. Documents read 
in error are rejected, and all data is 
listed on a printer. If the Selective Tape 
List feature is present on the printer, 
data is printed on the leftmost tape. 

Documents from the second reader are 
selected according to a digit in the field 
read and printed on SYSLST. If manual 
intervention is required on the second 
reader, a message is printed on SYSLOG. 

The message is: 

INTERVENTION REQUIRED ON FILE2. 

The program names are Z.MCR1 and Z.MCR2. 
The 1419 sample problems support the 
1255/1259. 


Instructions show how to remove the 
following cpticnal features: 

1. Dual addressing adapter feature 

2. Batch numbering 

3. Pccket lights 

4. Selective Tape List Feature (Printer) 


SYSLOG_Output_IS: 

BG // JCB NCR SAMPLE PRCELEMS 

EG // PAUSE END OF MCRl SAMPLE PROBLEM 

BG 

EG INTERVENTION REQUIRED ON FILE2 
BG ECJ MCR 

EG // PAUSE END OF MCR SAMPLE PROBLEMS 
S YS LS T Ou tput Su mm ary: 

• Job ccntrcl cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Linkage editor input diagnostics 

• Linkage editor storage map 

• Document data listings 
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Module 8: Magnetic Tape -- 370N-IO-456 


Modular Outline 

Source Statement Library.22 6 

File Definition Macros.226 

Storage Requirements.226 

DTFMT (Define The File: Magnetic 

Tape) Table Requirements.22 6 

MTMOD (Magnetic Tape Module) . . . .227 
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So ur ce St at em ent L ibrar y 


Source 

Statement 

Library 

Macros 

i 

1 

1 

Blocks 

2 

T 

i 

L 

794 


Fi le Defi niti on Macros 


A.ETFMT 
ft.MTMOD 


S TORA GE REQUIREME NTS 

Figures 8-1 and 8-2 define the storage requirements for ETFMT and MTMOE. 

DTFMT_(Define The File:_Magn et ic Tap e) Table Requ ireme nt s 

TYPEFLE=WORK requires 48 bytes per workfile. 


The table requirements for INPUT and OUTPUT files are: 


f-T- 

TYPEFLE= I RECFORM 


T-1 

ERROPT, 
ERREXT 
(With 

STDLABELS) 


Basic 

Size 

Without 

STDLAEELS 


ERROPT, 

ERREXT 

(Without 

STDLAEELS) 


Basic 

Size 

With 

stelaeel: 


4 - 


INPUT 


FIXUNB 

or 

FIXBLK 


96 


VARUNB 

or 

VARBLK 


109 


UNDEF 


SPNUNB 


92 

132 


112 


128 


108 


132 


OUTPUT 


FIXUNB 

or 

FIXBLK 


86 


+ 10 


VARUNB 

or 

VARBLK 


98 


+ 10 


UNDEF 


SPNUNB 

i-r 


84 

132 


+ 4 
* 


104 


116 


100 


+ 4 


+ 4 


+ 4 


132 | * 

_ ± _J 


* Included in basic Size of Module. 
Figure 8-1. DTFMT—Table Requirements 
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MTMOD (Ma gnet i c Tape Modu le) 


■TT' 

II 


EBCDIC MAGNETIC TAPE MODULE 
- T - 


INDEPENDENT OPTIONS 
- T -T — 




1 1 

BASIC 

1 

WORKA= 

1 

CKPRTEC= 

1 

READ = 

1 



RECFORM= 

1 1 

MODULE 

1 

YES 

1 

YES 

1 

EACK 

1 

ERREXl 

h 

FIXUNB/FIXBLK 

-++- 

il 

688 

-4- 

1 

+ 80 

-4- 

1 

+ 112 

-4- 

1 

+ 96 

-4- 

1 

+ 96 

h 

VARUNE/VARELK 

-++- 
1 1 

824 

-4- 

1 

+ 112 

-4- 

1 

+ 1C8 

-4- 

1 

+ 84 

-4- 

1 

+ 96 

h 

UNDEF 

-44- 

11 

560 

-4- 

1 

+ 80 

-4- 

1 

+ 120 

-4- 

1 

+ 16 

-4- 

1 

+ 96 


4 +- 

II 


SPNUNE/SPNELK 


1808 


+ 260 


+300 | +252 

I _ x _J 


Notes: 

1. Only one module is required for processing all files having a common 
RECFORM. This module can te generated with the options charted 
above. To determine the size of the module with the options, the 
number of option bytes specified in the chart must be added to the 
basic module. 

2. RDONLY=YES, changes the size of the module -50 to +50 bytes. In 
addition, the user's program must provide a 72-byte save area each 
time the module is reentered. 


Figure 8-2. MTMOD—Main Storage Table Requirements (Part 1 of 3) 


WORKFILE MODULE 


TYPEFLE=WCRK 


without 

NOTEPNT 


NOTEPNT : 


J.-+■ 

J Without ERROFT j 

1 -- 4 . 

j with ERROPT | 


YES 


POINTS 


232 

280 

436 


424 


286 


540 


380 


j.-4. 

| with ERROPT 6 j 

j ERREXT 1 

L-JL. 


654 | 494 

I 

_J_ 


Figure 8-2. MTMOD—Main Storage Table Requirements (Part 2 of 3) 
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I 

I- 


I- 

I 

I- 

I 

I- 




ASCII 

MAGNETIC TAPE 

MODULE 




•l 


n 

1 1 


— 1 — 

1 

INDEPENDENT OPTIONS 

- .. — — 

— 

--1 


II 

II 

BASIC 

H 

1 

T 

WORKA= | 

CKPRTEC= 

1— 
1 

READ= 

r - 

1 

-^ 

RECFORM= 

1 1 

MODULE 

1 

YES | 

YES 

1 

EACK 

1 

ERREXT| 
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Figure 8-2. MTMOD--Main Storage Requirements (Part 3 of 3) 
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Module 9: Optical Reader — 370N-IO-478 


Modular Outline 

Core Image Library.230 

Transients.230 

Source Statement Library.23 0 

Macros.230 

File Definition.230 

Imperative.230 

Sample Problems.230 

Storage Requirements.230 

ORMOD (Optical Reader Module) . . .230 

DTFOR (Define The tile: Optical 

Reader) Table Requirements.230 

Sample Problem Summary.231 

SYSLOG Output.231 

SYSIST Output Summary.231 
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Transients(231112314/j 33301 
1 12319 | 1 


Blocks (Macros |Blccks 
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4-f 

| 609 | 


I 2 | 
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A _ X. 


Macros 


FIL E_DEFINITICN 

A.DTEOR 
A•ORMOD 

IMPERATIVE 

A.DSPLY 
A.RDLNE 
A. RESCN 

SAMPIE P ROBLEM S: 


C OR E IMAGE LIBRARY 
Transients 


Z.CRDC 
Z.ORJT 


$$ANERR9 Errcr Recovery Procedure STORA GE REQ UIR E MEN TS 

$ $ECORO1 OPEN 

Figure 9-1 defines the storage requirements 
SOURCE STATEMENT LIBRARY for ORMOD. 


ORMOD ( Op tical Reader Module) 


■TT‘ 


INDEPENDENT OPTIONS 

-T-T- 



1 


i 1 


1 


1 


1 


1 

IOAREA 2 = 


! 


1 1 
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1 

CONTROL^ 

1 

IOAREA2 


WCRKA 

= | 

YES and 

DEVICE 
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RECFORM= 

I 1 
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1 
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1 
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1 
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1 
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1 
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I 

+ 96 


i 
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1 1 
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i 
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1 

+ 56 
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1 

+ 84 
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848 
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1 

+ 5 6 

1 
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1 
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i 

i 

i 
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BLKFAC=YES 

1 1 

1 1 

1 1 
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1 

1 

1 
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1 

1 

1 

+ 56 

1 

1 

1 

+ 24 

1 

1 

1 

+ 80 
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i 


I 1 


1 


1 


1 


1 


or 

i 

FIXUNb 

1 1 

1360 

1 

+ 184 

i 

— 

! 

— 

! 

— 

1288 

i 
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1 1 

1256 

1 
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1 

— 

1 

— 

1 

— 


I- igure 9-1. OPTICAL READER--ORMOD Main Storage Requirements 


DT FC R (Define T he Fi l e: _Optic al R ea d er) Tab le Re qu ir em ents 

1. RECFCRM=FIXUNB requires 136 bytes. 

2. RECEORM=FIXELK varies as a function of blocking. 

Size = 136 + (16 x blocking factor x number cf I/O areas) 

3. RECFORM=UNDEE requires 136 bytes. 


230 DOS Version 4 System Generation 





























Sample Pr oblem Summar y 


The 1288 sample problem is obtained by 
retrieving the sample problem for the 1287 
journal tape mode of operation (Z.CRJT) and 
changing the cards with the sequence 
numbers 1058 and 1071 as fellows: For both 
cards change the parameter EEVICE=1287T to 
DEVICE=1287D. (Refer to the listing 
containing the source statements for the 
sample test program for journal tape 
processing.) Figure 9-2 illustrates the 
files used by both problems, and Figure 9-3 
illustrates the card decks that are punched 
when the sample problem is retrieved. 


The sample problem illustrating document 
processing for the 1287 or 1288 optical 
reader (Z.ORDC) reads documents for data 
input into an input area, and then prints 
this data cn SYSLST. Whenever the 1287 or 
1288 document hopper empties, press 
end-of-file or replenish the stack. 


Any approved document type may be used 
because the reference mark and data field 
coordinates are entered at program 
execution time. However, the data field 
chosen to be read may not exceed six 
characters in length. 

Figure 9-4 is a sample input document. 
The listing contains examples of keyed-in 
error corrections identified by comments. 

Note: When using this program cn a 1288, 

remove the RESCN and DSPLY macro 
statements within sequence numbers 
0091 and 0109. 

The sample problem illustrating journal 
tape mode processing for the 1287 optical 
reader reads undefined records from the 
1287 optical reader into a werk area from 
two I/C areas, and then prints these 
records on SYSLST. 

Any journal tape with a maximum record 
size of 38 characters is suitable for this 
sample problem. 

Figure 9-5 is a portion of a sample 
input journal tape. 



Disk Extent 

Number 


Phase 

T 

1 1 

4 

T 

! 2 

i 

1 3 

4 

i 4 

-j. 

Assemble 
Link Edit 
Execute 
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. j SYSLNK 

1 

i. 

i 

|SYS001 
|SYS001 

1 

l 

| SYS002 

1 

1 

i. 

f SYS003 

1 - 
1 

-I 


Figure 9-2. OPTICAL READER--Sairple Problem 
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jeards Retrieved 

L 

T T 

|Card Cols.|Card Cels. 

| 73-76 |77-80 

r _L 

r 

ICATALS Z.CRDC 

T 

1 

T 

1 

| EKEND Z.CRDC 

1 

$478 |C001-017 9 

| Document Mode 

1 

i 

j Source Eeck (179 

1 

1 

| Cards) 

1 

1 

|EKEND 

1 

1 

1 

1 

| 

ICATALS Z.CRJT 

1 

1 

1 

i 

|BKEND z.orjt 

1 

$478 |1001-1081 

(Journal Tape Source| 

1 

| Deck (81 Cards) 

1 

1 

(BKEKD 

1 

1 

L 

I 

___ _L _ 


Figure 9-3. OPTICAL REAEER--Sample Problem 
Card Deck 


SYS L CG O utput : 

// JOB OPTICAL READER SAMPLE PRCELEM 
EOJ OPTICAL 

// PAUSE ELD OF OPTICAL READER SAMPLE 
PROBLEM 

SYSL ST O utput Summa ry: 

• Job control cards 


• External symbol dictionary 


• Source program listing 


• Relocation dictionary 


• Linkage editor input diagnostics 


• Linkage editor storage map 


• List cf fields read from: 

for document sample problem, or 
fer journal tape sample problem 
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ITM NUMM9 


05 24680 

357 4 8 

2500 

01 36925 

468 1 0 

4-9 8 

02 13579 
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TAX 
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0 
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Figure 9-4. OPTICAL READER—Sample Input 
Document for Document Mode 
Processing 
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Figure 9-5. OPTICAL READER—Sample Input 
for Journal Tape Mode 
Processing 
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Module 10: Paper Tape--370N-IO-458 


Modular Outline 

Core Image library.234 

Transients.234 

Source Statement Library.234 

File Definition Macros.234 

Storage Requirements ..234 

DTFPT (Define The File: Paper 

Tape) Table Requirements.234 

Input File.234 

Output File.234 

PTKOD (Paper Tape Module).234 
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r 


-1 

Libraries I 


j.--- t- 1 

| Core Irrage (Source Library| 

F-T-4-T-J 

| ( Elocks | | | 

I [ -T-T \ I I 

i j (2319 j 333 01 I | 

(Transientsj2311|2314/| |Macros|Blocks | 

I I 12319 III | 

j.-j .—4 -4—4-4-f 

| 4 I 4 I 4 I 4 I 2 I 459 I 

L-X-X--X-X-X-J 


C ORE IMAGE LIBRARY 
Transients 


STO R AGE RE QUIREMENT S 

DTFPT_(D efine The File :_Pa per T ape ) T a ble 

Requirement s 


INP U T F ILE 

The possible table specifications and sizes 

are: 

1. No translations, nc shifts, and no 
deletes require 72 bytes. 

2. TRANS=name with no shifts and no 
deletes requires 76 bytes. 

3. TRANS=name, SCAN=naire, RECEORM=FIXUNE 
require 110 bytes. 

4. TRANS=name, SCAN=name, RECFORM=UNDEF 
require 94 bytes. 


$$ANERAI 

$$ANERAJ 

$$ANERRX 

$$EERPTP 


Error Recovery Procedure (ERP) 

ERP 

ERP 

ERP - 1018 with errcr 

correction feature 


OUTPUT FILE 

The possible table specifications and sizes 
are: 

1. No shifts require 69 bytes. 

2. Shifts require 83 bytes. 


S OURC E STAT EMEN T LIBRA RY 

File Defini tio n Ma cr os FTMOC_ (Paper T a pe M o dul e) 


A. DTFPT 
A.PTMOD 


The module specifications and sizes are 
specified in Figure 10-1. 


1 


! 2 

I 

H 
I 3 
I 

I— 

|4 

I 

f- 

|5 

h 

16 


No parameters specified (no 
translation, no shifts and nc 
deletes) 


TRANS=YES with no shifts and 
no deletes 


TRANS=YES, SCAN=YES, 
RECFORM=FIXUNB 


TRANS=YE3, SCAN=YES, 
RECFORM=UNBEF 


No shifts 


Shifts 


r- t-1 

INPUT | OUTPUT 


4- 


2671 | 1017 | 1018 


244 


288 


310 


354 


-+- 

570 | 

I 

-4- 


536 


436 


474 


352 

570 


Note: If module 2 is used, all records 

require translation. 

Figure 10-1. PTMOD—Main Storage Requirements 
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Module 11: Sequential Disk — 370N-IO-455 


Modular Outline 


Source Statement Library.236 

File Definition Macros ..236 

Storage Requirements . 236 

DTFSD (DEFINE THE FILE: SEQUENTIAL 
DASD).236 


SDMOD (SEQUENTIAL DASD MODULE) . . .237 
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SOURCE STATEMENT LIBRARY 


File Definition Macros 


A.DTFSD 
A.SDMOD 
A. SDMODFI 
A.SEMODFO 
A. SDMODFU 
A.SDMODVI 


A.SDMODVO 
A.SEMODVU 
A.SDMODUI 
A.SEMODUO 
A.SDMODUU 
A.SEMODW 


ST ORA GE REQUIREMENTS 

Figures 11-1 and 11-2 specify the storage required by DTFSD and SDMCD. 


DTFSB_!DEFINE_THE_FILE:_ SEQ UENTIAL DASD) 
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RECFORM= 
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1 
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1 
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1 - 

1 - 

1 

+ 24 
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-4- 


—4- 
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— 
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i 1 
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1 
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1 — 

1 — 

1 

+ 24 
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1 
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-++■ 
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Figure 11-1. DTFSD—Main Storage Requirements 
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SDMOD__(SEQyENTIAI_DASD_MgDULE)_ 


'TT' 


- r - 1 

EBRCPT| RECFCRM=SPNELK 
ERREXTj RECFORM=SPNtJNB 


Module Name|| Basic Module 

-44— 


TRUNCS 


CONTROL 


ERROPT 


HOLD 


-+- 


SDMGDEI 


-44- 


462 

546 


+ 80 


+ 28 


+144 


+228 


SDMODFO 


-++- 


+ 136 


+ 28 


+ 64 


+ 200 


SCMODFU 


-44- 


798 

729 


+ 88 


+ 28 


+164 


+ 96 


+252 


SDMODVI 


-44- 
I I 

-44- 


+ 28 


+ 104 


+ 188 


3 00-400 
1050-1150 
1500 


SDMODVO 


1045 

1086 


+ 28 


+ 68 


+120 


SDMODVU 


-44- 


+ 28 


+ 176 


+ 76 


+ 296 


-4 


SDMODUI 


-44- 
I I 

-44- 


533 

653 


+ 28 


+100 


+171 


SDMODUO 

SDMODUU 


+ 28 


+ 68 


+ 116 


-44- 

I I 

-XL. 


941 

572 


+ 28 


+14 8 


+ 40 


+248 


SDMODfo 


+ 22 


+148 j +10 | +246 

x-x_x-x 


♦The HOLD function does not apply to these modules. 

Notes: 

1. For SDMCEW, NOTEPNT-YES requires 206 additional bytes: NOTEPNT=ECINTRK 
requires 144 additional bytes, UPD£TE=YES requires 40 additional bytes. 

2. RDQNLY=YES changes the size of the module -50 to +50 bytes. In 
addition, the user's program must provide a 72-byte save area each time 
the module is reentered. 

Figure 11-2. SCMOD--Storage Requirements 
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Module 12: Assembler D — 370N-AS-465 


Modular Outline 

IBM-supplied Assemblers.240 

Warning Diagnostics.240 

Core Image Library.240 

Phases.240 

Relocatable Library.240 

Modules.241 

Linkage Edit Statements.241 

Delete Statements . ..241 

Source Statement Library.241 

Sample Problems.241 

Wcrkfiles.241 
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IEM-SUPPLIED ASSEMBLERS 


CORE IMAGE LIBRARY 


If Systeni/37C instructions are to be 
assembled. Assembler D must be used. The 
relocatable library of the IBM-supplied 
system residence contains assembler modules 
suitable for building an Assembler using 
both tape and disk workfiles. 


N ot e: See also M od ule 13, Assembler F 

— 36CN -AS-466 , of this manual. 


Assembler D requires a minimum cf 14K 
bytes of contiguous problem storage for use 
by the assembler. 


The names of the 14K modules begin with 
IJQ, thus modules can be copied, punched, 
or deleted by a COPYR, PUNCH, or DELETR 
statement specifying IJQ.ALL as an operand. 


Assembler D can reside with Assembler F 
if the name of the first phase cf cne cf 
them is changed from ASSEMELY to some other 
name by means of the RENAMC function of the 
MAINT program. The renaming must be 
performed before the second assembler is 
linkage edited into the core image library. 
The first one is then invoked under its new 
name; the second under the name ASSEMBLY. 


It is expedient, during system 
generation, to use the largest assembler 
the machine can support because the 
performance improvement is most 
significant. 


WARNING DIAGNOSTICS 


The following warning diagnostics appear in 
the linkage editor maps during system 
generation, but they do not indicate 
errors. 


♦UNREFERENCED SYMBOLS 

EXTRN IJQD0$45 

EXTRN IJQD0$57 

EXTRN IJQD0$ 58 

EXTRN IJQD0A10 

EXTRN IJQRTA30 

EXTRN IJQRTB39 

EXTRN IJQRTB54 

EXTRN IJQD2$30 

POSSIBLE INVALID ENTRY POINT 
DUPLICATION IN INPUT 


r - T -T 

| | Blocks | 

j.-4-r-r--I 

I Phases ( 2311 | 2314/2319 | 3330 | 

j.- 4 -4-4--| 

| 32 | 85 1 88 | 102 | 

L_I_I_I_J 


Phases 


ASSEMELY 

ASSEM02 

ASSEM02A 


ASSEM03 

ASSEM03A 

ASSEM04 

ASSEM04A 

ASSEM04B 


ASSEMO 5 

ASSEM05A 

ASSEM05B 

ASSEM06 

ASSEN07 

ASSEN07A 

ASSEN07C 

ASSEN07I 

ASSEN08 

ASSEN08A 

ASSEN08C 

ASSEN088 

ASSEN09 

ASSEN09I 

ASSEN10 

ASSEN10B 
ASSENllA 
ASSEN11B 
ASSEN11C 
ASSEN11D 

ASSEN11E 
ASSEN12 
ASSEN13 
ASSEN14 


RELO CAT AB LE LI B RAR Y 


Modules 

— r - 

1 

- 4- 

Elocks 

26 

T 

1 

567 


_ ± _ 
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Modules 


Sam pl e Pr oblem s 


IJQABT 
IJQDIA$ 
IJQEPP 
IJQD 0$ 
IJQE2$$ 

IJQC2A 
IJQD3$$ 
IJQE3A$ 
IJQD 32 
IJQE4A$ 
IJQD4M$ 

IJQE4P 
IJQE5A$ 
IJQD5M$ 
IJQE5P$ 
IJQD7$$ 

IJQD7I 
IJQE8$$ 
IJQD 9$ $ 
IJQD9I$ 
IJQRTA 

IJQRTB 
IJQ10$$ 
IJQ10B $ 
IJQ21A$ 
IJQ 21B$ 


Linkage E dit St at ements 

INCLUDE IJQD32 
// EXEC LNKEET 

Delete St aterrents 

DELETR IJQ.ALL 


SOURCE STATEMENT LIBRARY 


Z.AS1 
Z. AS2 
Z . AS3 
Z. AS4 
Z.AS5 
Z. AS6 


See A ss eirll er Sam ple Pro b le ms. 


fcORKFILES 


The Asseirller D v/orkfile requireirents can 
be deteririned by adding the appropriate 
track values from Figure 12-2 to the 
appropriate track values determined from 
Figure 12-1. Note that Figure 12-1 is 
expressed in terms of number of bytes. The 
approximate number of tracks can be 
calculated by dividing the number of bytes 
by 3C00 for a 2311 file, by 6000 fcr a 
2314/2319 file, cr by 12C00 for a 3330 
file. These numbers represent the 
approximate number of text bytes per track 
for a 2311, a 2314/2319, and a 3330 
respectively. In Figure 12-2 SYSLNK 
requirements are expressed in terms of 
tracks per macro instruction; the other 
three areas are expressed in tracks per 
macro de finiti on. 

In determining the total number of 
tracks required fcr Assembler Vvorkfiles, 
the SYSLNK value must be included each time 
the macrc instruction is used. The SYS001, 
SYSC02, and SYS003 values need be included 
cnly cnce per macro definition, regardless 
of the number of times the macro 
instruction is used. 

Fcr example, if three tape files are 
defined, three DTEMT macros are used. The 
track values for SYS001, SYS002, SYS003 are 
included cnce because the Assembler uses 
macro definition only once; but the SYSLNK 
value is multiplied by three because the 
macro instruction is expanded three times. 


Number cf Eytes per Statement 
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SYS001 


SYS002 


SYS003 


T-f- 

j1 for 1 | 

(Statements | 
.x_L. 


|IJQD32 
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15 


130 


130 


36 


Figure 12-1. ASSEMBLER D --Nonmacro Assembly focrkfile Requirements for 2311, 2314/2319 
and 3330 
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Nuirter cf Tracks 
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* The measurements for DTFEN, unlike the ether iracrc instruction 
measurements, represent minimum workfile requirements. The 
measurements were made assembling DTFEN by itself, which resulted in 
minimum expansion. The use of DTFEN should be avoided wherever 
possible because of its large werkfile requirements. 

Figure 12-2. ASSEMBLER D --Macro Instruction Workfile Requirements for 
the IBM 2311, IBM 2314/2319, and IBM 3330 (Part 2 of 2) 
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Modules 


IBM-SUPPLIED ASSEMBLERS 


If System/370 instructions are to be 

assembled. Assembler D must he used. IJYAET 

Assembler F requires a minimum of 44K bytes IJYASM 

of contiguous storage. IJYCM 
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The names of the 44K modules begin with 
IJY; therefore, modules can be copied, IJYFFF 

punched, or deleted by a CCFYR, PUNCH, or IJYFO 

DELETR statement specifying IJY.ALL as an IJYF1 

operand. IJYF2 

IJYF3 

Assembler D can reside with Assemoler F 
if the name of the first phase cf cne of IJYF3E 

them is changed from ASSEMBLY to some other IJYF7C 

name by means of the RENAMC function of the IJYF7D 

MAINT program. The renaming must be IJYF7E 

performed before the second assemoler is IJYF7G 

linkage edited into the core image library. IJYF7I 

The first one is then invoked under its new IJYF7I 

name; the second under the name ASSEMBLY. IJYF7N 
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performance improvement is most IJYF8A 

significant. IJYF8C 

IJYF8E 


IJYF8I 


CORE_IMAGE_LIBRARY 


Phases 


IJYF8L 

IJYF8M 

IJYF8N 

IJYF8P 

IJYF8S 


r- 1 

| Elocks | 


r — 
1 

pnases 

-f- 

1 

2311 

—T" 
1 

2314/2319 

-i 

1 

H- 

1 

8 

--4~ 

1 

70 

-4- 

! 

71 

H 

1 

i_ 

_ 


_ 

_ 


_ j 


IJYF8V 

IJYIN 

IJYRTA 

IJYRTE 


Lin k age Edit St atement s 


ASSEMAET 

ASSEMBLY 

ASSEMFI 

ASSEMFPP 

ASSEMF8 

ASSEM3 

ASSEM3E 

ASSEM7 


INCLUDE IJYASM 
// EXEC LNKEDT 


Delete Stateme n ts 


DELETR IJY.ALL 


RELOCATABLE LIBRARY 


Modules 

— T - 

1 

_ i 

Elocks 

34 

r 

1 

477 


. ± 



SOUR CE STATEM EN T L IBRARY 
Sample Proble ms 


Z. AS1 
Z. AS2 
Z.AS3 
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Z . AS 4 
Z. ASS 
Z . AS6 

See Module 14, A ssembler Sampl e 
Problems. 


WQ RKF ILES 

The Assembler F workfile requirements can 
be determined by adding the appropriate 
track values from Figure 13-2 tc the 
appropriate track values determined from 
Figure 13-1. Note that Figure 13-1 is 
expressed in terms of number of bytes. The 
approximate number of tracks can be 
calculated by dividing the number of bytes 
by 3000 for a 2311 file or by 6000 for a 
2314/2319 file. These numbers represent 
the approximate number of text bytes per 
track for a 2311 and a 2314/2319, 


respectively. In Figure 13-2 SYSLNK 
requirements are expressed in terms of 
tracks per macro instructio n; the ether 
three areas are expressed in tracks per 
macro definiti on. 

In determining the total number of 
tracks required for assembler workfiles, 
the SYSLNK value must be included each time 
the macrc instruction is used. The SYS001, 
SYS002, and SYS003 values need be included 
only once per macro definition, regardless 
cf the number of times the macro 
instruction is used. 

For example, if three tape files are 
defined, three DTFMT macros are used. The 
track values for SYS001, SYS002, SYS003 are 
included cnce, because the assembler uses 
macro definition only cnce; but the SYSLNK 
value is multiplied by three because the 
macro instruction is expanded three times. 
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IJYASM j1 for 1 | 
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Figure 13-1. ASSEMBLER F —Ncnmacrc Assembly Wcrkfile Requirements for 2311 and 
2314/2319 
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Figure 13-2 


ASSEMBIER F - 
the IBM 2311 


--Macro instruction Workfile Requirements for 
and IBM 2314/2319 (Part 1 cf 2) 
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Number of Tracks 
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SEMODFI 
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SDMODW 


* The measurements for DTFEN, unlike the other macro instruction 
measurements, represent minimum workfile requirements. The 
measurements were made assembling DTFEN by itself, which resulted in 
minimum expansion. The use cf ETFEN should be avoided wherever 
possible because of its large workfile requirements. 


Figure 13-2. ASSEMBLER F --Macro Instruction Workfile Requirements for 
the IBM 2311 and IEM 2314/2319 (Part 2 cf 2) 
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SYSLOG Output.253 

SYSLST Output Summary.253 

Problem 2: Assembler 2.254 

SYSLOG Output.254 

SYSLST Output Summary .254 

Problem 3: Assembler 3.255 

SYSLOG Output.255 

SYSLST Output Summary.255 

Problem 4: Assembler 4.256 

SYSLOG Output.256 

SYSLST Output Summary.25 6 

Problem 5: Assembler 5.257 

SYSLOG Output. .257 

SYSLST Output Summary.257 

Problem 6: Assembler 6.258 

SYSLOG Output.25 8 

SYSLST Output Summary.258 
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The files required by all the assembler sample prcblems are listed in 
Figure 14-1. Figure 14-2 illustrates the sample problem card decks 
retrieved from the source statement library. 
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Figure 14-1. ASSEMBLERS--Sample Problem File Requirements 
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| BKEND 



1 1 

I 1 


1 

| 


|CATALS Z.AS4 



1 1 

I 1 


1 

1 


|BKEND Z.AS4 



1 1 


1 

Tape and Disk ( 

(Assembler Source 

Deck 

$465 

(0402-0423 | 

4 

1 

Scrt/Merge | 

| (23 Cards) 



1 1 


1 

Z.SM4 | 

| BKEND 



1 1 


1 

I 


|CATALS Z.AS5 



1 1 

1 1 


1 

1 


|BKEND Z.AS5 



1 1 


1 

Tape and Disk | 

(Assembler Source 

Deck 

$465 

| 0502-0523 | 

5 

1 

Scrt/Merge | 

j (23 Cards) 



1 1 


1 

1 

Z.SM5 | 

|CATALS Z.AS6 



1 1 

1 1 


1 

1 


| BKEND Z.AS6 



1 1 


1 

Tape and Disk | 

(Assembler Scurce 

Deck 

$465 

| 0602-0623| 

6 

1 

Sort/Merge | 

( (23 Cards) 



1 1 


1 

Z.SM6 j 

| EKEND 



1 1 


1 


l 

X 

X J_ 

_ 

._r. 

j 


Figure 14-2. ASSEMBLERS—Sample Prcblem Card Decks 
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Problem 1: Assembler 1 


Program Name is Z.AS1. The Assembler 1 sample problem generates numbers 
from 2000 to 0001, in descending order and writes them on tape as 15- 
character unblocked records (11 blanks fcllcwed by 4 zcne digits, 
unsigned). 

To execute the Assembler 1 sample problem, the following job control 
cards are needed: 

// JOB ASSEMELE SAMPLE 1. 

// OPTION LINK,LIST,LOG,NOXREF 
// EXEC ASSEMBLY 

Assembler Source Deck (23 cards) 

/* 

// EXEC LNKEDT 
// ASSGN SYS002,X* cuu' 

// PAUSE ASSGN SYS002 TO A 9 TRACK TAPE DRIVE 
// MTC REW,SYS002 
// EXEC 
/£ 


S YSIQG Output 
// JOB ASSEMELE 

// PAUSE ASSGN SYS002 TO A 9 TRACK TAPE DRIVE 
EOJ ASSEMBLE 

SYSLS T Output S ummar y: 

• Job control cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Linkage editor storage map 
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Problem 2: Assembler 2 


Program Name is Z.AS2. The Assembler 2 sample problem generates numbers 
from 2000 tc 0001, in descending order, and writes them on disk. 

To execute the Assembler 2 sample problem, the following job control 
cards are needed: 

Col. 16 Col, 54 Col. 72 

f ft 

// JOB ASSEMBLE SAMPLE 2 
// OPTION LINK,LIST,LOG,NOXREF 
// EXEC ASSEMBLY 

Assembler Source Deck (23 cards) 

/* 

// EXEC LNKEDT 
// ASSGN SYS002,X'CUU * 

// PAUSE ASSGN SYS002 to SCRATCH PACK 

// DLBL OUTFILE,'SAMPLE PRCEIEM FILE OF 2000 RECORDS'[,yy/ddd] 

// EXTENT SYS002,hhhhhh,l,0,1800,43 
// EXEC 
/& 


Not e: Replace hhhhhh in the EXTENT card with the volume serial number of 

the disk pack. 


SYSLO G Output 
// JOB ASSEMELE 

// PAUSE ASSIGN SYS002 TO SCRATCH PACK 
EOJ ASSEMBLE 

SYSL ST Output Summary : 

• Job control cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Linkage editor storage map 
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Problem 3: Assembler 3 


Prograir Name is Z.AS3. The Assembler 3 sample problem generates numbers 
from 100 to 001, in descending order, and writes them cn a data cell. 

To execute the Assembler 3 sample problem, the following jot control 
cards are needed: 


Col. 16 Cel. b4 Cel. 72 

f It 


// JOB A3SEMELE SAMPLE 3 
// OPTION LINK,LIST,LOG,NGXREF 
// EXEC ASSEMBLY 

Assembler Source Deck (23 cards) 

/* 

// EXEC LNKEDT 

// ELBE OUTFILE,'SAMPLE PROELEM EILE OF 100 RECORDS'[,yy/ddd] 

// EXTENT SYS004,hhhhhh,l,0,10200,20,,B=3 
// ASSGN SYS004,X* cuu * 

* PAUSE ASSGN SYS004 TO DATA CELL 
// PAUSE MOUNT CELL hhhhhh ON STATION 3 
// EXEC 
/£ 

Note: Replace hhhhhh in the EXTENT card with the volume serial number cf 

the data cell. 


§>YSIOG_putput 
// JOB ASSEMELE 

* PAUSE ASSGN SYS004 TO DATA CEII 
// PAUSE MOUNT CELL nnnnnn ON STATION 3 
EOJ ASSEMBLE 

SY SLS T Ou tput S ummar y: 

• Jot control cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Linkage editor storage map 
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Problem 4: Assembler 4 


Prograir Name is Z.AS4. The Assembler 4 sample problem generates numbers 
from 2000 to 0C01 # in descending order, and writes them cn tape as 15 
character unblocked records (11 blanks followed by 4 zoned digits, 
unsigned). 

To execute the Assembler 4 sample problem, the following job control 
cards are needed: 

// JOB ASSEMBLY SAMPLE 4 
// OPTION LINK,LIST,LOG,NOXREF 
// EXEC ASSEMBLY 

Assembler Source Deck (23 cards) 

/* 

// EXEC LNKEET 
// ASSGN SYS002,X'cuu' 

// PAUSE ASSGN SYS002 TO A 9 TRACK TAPE DRIVE 
// MTC REW,SYS 002 
// EXEC 
/£ 


SXSLOG_Out£Ut 

BG // JOB ASSEMBLY SAMPLE 4 

EG // PAUSE ASSGN SYS002 TO A 9 TRACK TAPE DRIVE 
BG 

EG EOJ ASSEMBLY 
§XSLST_Output_Summary: 

• Job control cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Linkage editor storage map 
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Problem 5: Assembler 5 


Program Name is Z.AS5. The Assembler 5 sample problem generates numbers 
from 2000 to 0001, in descending order, and writes them to a 2311 disk 
storage device. 

To execute the Assembler 5 sample problem, the following job control 
cards are needed: 

Col. 16 Cel. 54 Cel. 72 

♦ I I 

// JOB ASSEMBLY SAMPLE 5 
// OPTION LINK,LIST,LOG,NOXREF 
// EXEC ASSEMBLY 

Assembler Source Deck (23 cards) 

/* 

// EXEC LNKEDT 
// ASSGN SYS002,X'cuu' 

// PAUSE ASSGN SYS002 TO SCRATCH PACK 

// DLBL OUTFILE,'SAMPLE PRCEIEM FILE OF 2000 RECORDS'[,yy/ddd] 

// EXTENT SYS002,hhhhhh,l,0,1800,43 
// EXEC 
/£ 

Note: Replace hhhhhh in the EXTENT card with the volume serial number cf 

the disk pack. 


SYSLOG_Output 

EG // JOE ASSEMELY SAMPLE 5 

BG // PAUSE ASSGN SYS002 TO SCRATCH PACK 

EG 

BG EOJ ASSEMBLY 
S YSLST Ou tp ut S ummary 

• Job control cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Linkage editor storage map 
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Problem 6: Assembler 6 


Prograrr Name is Z.AS6. The Assembler 6 sample problem generates numbers 
from 3C00 to 0001, in descending order, and writes them to a 2314 direct 
access storage facility or 2319 disk storage facility. 

To execute the Assembler 6 sample problem, the following job control 
cards are needed: 

Col. 16 Col. 54 

T T 

// JOB ASSEMBLY SAMPLE 6 
// OPTION LINK,LIST,LOG,NOXREF 
// EXEC ASSEMBLY 

Assembler Source Deck (23 cards) 

/* 

// EXEC LNKEET 
// ASSGN SYSCO2,CUTFILE 
// PAUSE ASSGN SYS002 TO SCRATCH PACK 

// DLBL OUTFILE.'SAMPLE PRCELEM FILE OF 2000 RECORDS'[,yy/dddl 
// EXTENT SYS002,hhhhhh,l,0,3600,83 
// EXEC 
/£ 

Note; Replace hhhhhh in the EXTENT card with the volume serial number cf 
the disk pack. 


Cel. 72 

T 


SY SL QG Output 

EG // JOE ASSEMELY SAMPLE 6 

BG // PAUSE ASSGN SYS002 TO SCRATCH PACK 

EG 

BG EOJ ASSEMBLY 
S YS IST Ou tp ut Su m mary : 

• Job control cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Linkage editor storage map 
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Module 15: American National Standard COBOL — 360N-CB-482 


Modular Outline 

Partition Size.26 0 

Core Image Library.260 

Phases.260 

Transients.260 

Relocatable Library.260 

Modules.26 0 

Linkage Edit Statements.260 

Delete Statements.260 

Subroutines.260 

Source Statement Library.261 

Sample Proclem.261 

Sample Program Summary.262 

SYSLOG Output.262 

SYSLST Output Summary.26 2 

Workfiles.263 

IBM 2311 ..263 

IBM 2314/2319 263 
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Modules 


PARTITION SIZE 


54 # 272 bytes 


CORE IMAGE LIBRARY 


r 


1 - 


-T-1 

|Number of Library Elccks | 

I (Physical Records) | 

Number of J-- x --j 

Phases | 2311 | 2314/2319 | 

-1-i-.j 

13 | 220 | 223 | 

3 | 2 | 2 | 

-JL_ X-J 


♦Transients 


ILACBD 

ILACBL00 

ILACBL01 

ILACBL10 

ILACBL11 

ILACEL12 

ILACBL20 

ILACEL21 

ILACBL22 

ILACBL30 

ILACEL40 

ILACBL50 

ILACBL51 

ILACBI60 

ILACBL61 

ILACBL70 


Phases 


FCOBOL 
fCOEOLll 
FCCEOL12 
FCOBOL20 
FCOEOL21 


Linkage E dit St atem ents 


INCLUDE ILACBD 
// EXEC LNKEDT 


Delete Statements 


FCOBOL22 
FCOEOL30 
FCOBOL4 0 
FCOEOL50 
FCOBOL 51 
FCGEGL60 
FCOBOL 61 
FCGEOL7 0 


Transients 


EELETR ILA.ALL 
SUBROUTINES 


Module N am e 

ILBDABXO 

ILEDACPO 

ILBDANEO 

ILEEANFO 

ILBDASYO 

ILEEATEO 

ILEDEIDO 


Bytes of 
Main Stor a ge 

242 

764 

322 

110 

88 

256 

112 


$ $ECOBER 
$$BCOBRl 
$$EFCMUL 


ILBDBIE0 

116 

ILEDEII0 

464 

IIBDCKE0 

736 

ILEDCLK0 

56 


RELOCATABLE LIBRARY 


ILBDCLS0 

150 

ILEECRD0 

150 

ILBDDAE0 

296 

IIBDDCI0 

177 


Modules 

T 

|Number of Library Elccks 
j (Physical Records) 

i 

16 

T 

| 1584 

67* 

| 256 


X 


♦ Subroutine s 


ILEEEIOO 
ILBEESPO 
ILBDDSRO 
ILEEEUMO 
ILBEEFL 0 

ILBEETEO 
ILBEFMT 0 


592 

2008 

342 

2 

524 


256 

182 
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ILBDFPW 0 

808 

ILBDTCDO 

200 

ILBDGPW 0 

88 

ILBETRNO 

256 

ILECIDAO 

218 

ILBDUPSO 

108 

ILBDIDB 0 

116 

ILBEUSLO 

372 

ILEEIDRO 

1663 

ILBDUTBO 

256 

ILBDIDI0 

692 

ILBDVBLO 

346 

ILEEIFEO 

296 

ILEEVCOO 

512 

ILBBIFDO 

156 

ILBDVMCO 

468 

ILBDIMLO 

88 

ILBEVTRO 

138 

ILECISEO 

404 

ILBDWTBO 

256 

ILBDISMO 

366 

ILBEXDIO 

273 

ILEDirfiO 

256 

ILBDXMUO 

184 

ILBDIVLO 

72 

ILBDXPRO 

608 

ILBDMFTO 

148 

ILEEXTNO 

26 4 

ILBEMNS 0 

1 



ILBDMOV 0 

66 



ILEEMVEO 

224 



ILBDNSLO 

616 

SOURCE STATEMENT 

LIBRARY 

ILBDOSYO 

132 



r .. ■■" ” 


ILBDRCRO 

148 

| Source 

Stateirent Library 

ILBERDIO 

440 

l-- 

T 

ILEERDSO 

246 

j Macro 

| Elock 

ILBDRFMO 

132 

t - 

i 

ILBDSAE 0 

236 

1 1 

| 24 



i 

j. 

ILEESCHO 

744 



ILBDSEMO 

279 



ILEESETO 

40 



ILBDSPAO 

1244 

Sairple Prcllerr 


ILEESRTO 

2380 


ILtiDSriO 

5 9 6 



ILBETEFO 

600 

Z . CE2 
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SAMPLE PROGRAM SU MMAR Y 

Program Name is Z.CB2. Figure 15-1 illustrates the files required by 
the American National Standard CCECL sample problem. Figure 15-2 
represents the American National Standard COBOL sample problem card deck 
that is retrieved from the source statement lifcrary. The American 
National Standard COBOL sample program generates and prints a table cf 
weekly, montnly, and annual salaries based cn ten-dcllar increments in 
monthly salary from $500 to $1000. To execute the American National 
Standard COBOL sample problem, the following jch ccntrcl cards are 
needed: 

// JOB SAMPLE 

// OPTION NCDECK,LINK,LIST,LOG,LISTX,DUMP,SYM,ERRS 
// EXEC FCCEGL 

CBL QUOTE 

(American National Standard COBOL Scurce Deck — 80 cards) 

/* 

// EXEC LNKEDT 

// ASSGN SYS004,X'cuu' (SYS004 must be assigned to printer designated as 
SYSLST during system generation) 

// EXEC 
/& 

S YSL GG Output: 

// JOB SAMPLE 
EOJ SAMPLE 

SY SL ST Ou tput Sum mar y: 

• Job control cards 

• Source program listing 

• Data division storage map 

• Procedure division storage map 

• Diagnostics 

• Linkage editor storage map 

• Table cf salaries generated by the program 
Note; Output is on SYS004 (same as printer)- 


r 

1 

T 

1 

Disk 

Extent 

Number 

1 

j-- 

"T 

T 

T T 

| Phase 

I 1 

1 2 

1 3 

| 4 | 5 

j.- 

i 

-f 

i 

-f-1- 

| Compile 

1 

|SYSLNK 

i 

|SYS001 

i 

|SYS002 

l 

| SYS003 |SYS004 

l i 

1 

|Link Edit 

1 

i 

|StfSLNK 

i 

i 

|SYS 001 

I 

1 

i 

i i 

i - i 

i i 

1 

|Execute 

1 

1 

1 

1 

i 

i 1 

i - i - 

L 

r 

_X 

r 

-X X 


Figure 15-1. American National Standard CCECL—Sample Problem File 
Requirements 


Cards Retrieved 

- T" 

1 

1 

- L- 

Card Cels 
73-76 

— T — 

- 1 

1 

4_ 

Card Cels. 
77-80 

CATALS Z.CB2 

EKEND Z.CE2 

T 

1 

1 

$482 

T 

I 

1 

CC01 - 0080 

American National Standard COBCL 

source deck 

(80 

cards) 

EKEND 

1 

_x. 


1 

_x_ 



Figure 15-2. American National Standard COBOL—Sample Problem Card Deck 
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WORKFILES 


The workfile requirements for American National Standard COEOI are as 
follows: 


IBM 2311 


The amount of work space fcr American National Standard CCBCI depends 
mainly on the size of the object program. Figure 15-3 shows the 
approximate percentage of tracks that should fce assigned to each 
programmer logical unit, fcr programs of approximately 1000 and 2100 
source records. Both programs are assumed to request a cross-reference 
listing. 


r-“T-T-T-T- 

| Number of | Total | SYS001 | SYS002 | SYS003 

| Source Records | Tracks | % | % | % 


j.-4-4-4-(• 

| 1000 | 60 | 33 | 37 | 


1 

1000 

1 

60 

1 

33 

1 

37 

1 

22 

f— 
1 

2100 

-4- 

1 

84 

-4- 

1 

28 

-4- 

1 

33 

-4- 

1 

24 

l_ 




_L_ 


_L_ 

__ 

_X_ 

_ 


4 

I 

4 

I 

i 


SYS004 | 

% | 

--J 

8 I 

-H 

15 | 


Figure 16-3. American National Standard COBOL—IBM 2311 Approximate 
Allocation of Vvorkfile Space 


IBM 2314/2319 


The amount of work space for American National Standard COBOL depends 
mainly on the size of the object program. Figure 15-4 shews the 
approximate percentage of tracks that should be assigned to each 
programmer logical unit, fcr pregrams cf approximately 1000 and 2100 
source records. Both programs are assumed tc request a cross-reference 
listing. 


r- 

(Number of 
|Source Records 

f- 

| 1000 

j.- 

| 2100 


T-T-T-T-T- 

| Total | SYS001 | SYS002 | SYS003 | SYS004 

| Tracks | % I % | % \ % 

4 - + - 1 - + - 1 - 

I 26 | 

4 - 4 - 

I 39 I 

I_X-1_X-X. 


35 

1 

-4- 

31 

1 

-4- 

23 

1 

—4— 

ll 

31 

1 

31 

1 

23 

1 

15 


1 


1 

I 

1 


Figure 15-4. American National Standard CCBOL--IBM 2314/2319 
Approximate Allocation of Norkfile Space 
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Module 16: COBOL - 360N-CB-452 


Modular Outline 

Partition'Size.266 

Core Image Library.266 

Phases.266 

Transients.266 

COBOL Debug Phase.266 

Relocatable Library.266 

Modules.266 

Linkage Edit Statements.267 

Delete Statements.267 

COEOL Debug Modules.26 7 

COBOL Debug Linkage Edit Statements 267 

Subroutines.267 

Source Statement Library.26 8 

Sample Problem.26 8 

Sample Problem Summary.26 9 

SYSL03 Output.26 9 

SYSLST Output Summary.270 

foorkfiles.270 

COEOL Wcrkfiles (IEM 2311).270 

COBOL Workfiles (IBM 2314/2319) . .270 
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P ART ITION SIZE 
14,336 bytes 


CORE IM AGE LI BRAR Y 


r-n 

| Blocks | 

r- t -i- t-•) 

| Component (Phases | 2311 |2314/| 

I I I (2319 | 

j.-i- \ --j--i 

| COBOL: | 47 | 172 (174 | 

| Transients | 5 | 5 | 5 j 

| CCEOL Debug I 1 | 4 | 4 | 

L_-_I_-L_L_J 


Phases 


COBCL039 

CCBCL040 

CCBOL041 

CCBCL042 

COBOLC43 

CCBCL044 

COBOL050 

COBCL055 


Transients 


$$ECELIS 

$$BCBICF 

$$ECEODA 

$$BCBUSR 

$$ECBUSW 


COBOL C OB OL Debug Phase 

COBCLOOO ... 

COBOLOOl 

COECL002 DEBUG 


COBOLOG3 

COBCL004 RELOCAT ABLE LI B RAR Y 

COBOLOQ5 


COBCL006 

r t 

COBCL007 

|Modulesj Elccks 


r + + • 

COBOL008 

(COEGL: j 51 j 1327 

COECL009 

1 1 1 

COBOLOIO 

(Subroutines ( 42 | 162 

COECLOll 

( COBOL Debug) 2 j 23 

COBOL012 

i 

i 

i 

i 

i 

i 

i 

■4 

1 

1 

1 

1 

1 

1 

1 

4 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

COBOLOl3 


COECL014 


COBOLOl5 

Modules 

COECL016 


COBOL017 


COECL018 

IJSCBD 

COBOLOl9 

IJSCBL01 

COECL020 

IJSCBL02 

COBOL021 

IJSCBLO 3 

COBCL022 

IJSCBL04 

COBCL023 

IJSCBL05 

COBOL024 

IJSCELO 6 

COECL025 

IJSCBL07 

COBOL027 

IJSCBL08 

COECL028 

IJSCBL09 

COBOL02 9 

IJSCBL10 

COECL030 

IJSCBLll 

COBOL031 

IJSCEL12 

COEGL032 

IJSCBL13 

COBOL033 

IJSCBL14 

COBOLO 34 

IJSCELl5 

COECLO 35 

IJSCBL16 

COBOL036 

IJSCEL17 

COECL037 

IJSCBL18 

COBOL03 8 

IJSCBL19 
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IJSCBL20 
IJSCBL21 
IJSCBL22 
IJSCBL23 
IJSCBL24 


IJSCBL25 
IJSCBL26 
IJSCBL27 
IJSCBL28 
IJSCBL29 


IJSCBL31 
IJSCBL32 
IJSCEL33 
IJSCBL34 
IJSCEL35 


IJSCBL36 
IJSCBL37 
IJSCBL38 
IJSCBL39 
IJSCBL40 

IJSCBL41 
IJSCBL4 2 
IJSCEL4 3 
IJSCBL44 
IJSCBL45 

IJSCBL4 6 
IJSCBL47 
IJSCBL48 
IJSCBL49 
IJSCBL50 
IJSCBL55 


Linka ge E dit St at emen ts 


INCLUDE IJSCBD 
// EXEC LNKEET 


Delete Statements 


DELETR IJS.ALL 

Note: This statement also deletes the 

Debug program. 


COBOL Deb ug M odules 


IJSDDB 
IJSCBL6 0 


COB OL Debug Li n kag e Edit Statements 


INCLUDE IJSDDB 
// EXEC LNKEDT 

Note: The COBOL Debug program is deleted 

when the COBOL Compiler is deleted. 

SUBRO UTINES 

Eor additional information about these 
subroutines, see the CCECL Programmer's 
Guide listed in the Pre fac e of this 
publication. 

Bytes of Main 


Module Name 

Storag 

IHD00000 

426 

IHE00100 

428 

IHD00200 

142 

IHD00300 

170 

IHD00400 

804 

IHD00500 

436 

IHD00600 

348 

IHD00700 

280 

IHB00800 

68 

IHD00900 

56 

IHD01000 

53 

IHD01100 

216 

IHD 012 00 

36 

IHD01300 

56 

IHD 01400 

52 

IHD01500 

330 

IHC01600 

80 

IHD 01700 

217 

IHD018 00 

57 

IHD 01900 

812 

IHD02000 

358 

IHD02100 

178 

IHD02200 

20 

IHE02300 

188 

IHD 024 00 

182 

IHD02500 

196 

IHD 026 00 

64 

IHD02700 

H20 

IHD 028 00 

372 

IHD02900 

316 

IHBG3000 

580 

IHD 03100 

880 

IHE03200 

611 

IHE03300 

228 

IHD03400 

638 

IHD03500 

796 

IHD 036 00 

338 

IHD03700 

691 

IHE03800 

1162 

IHD03900 

781 

IHD04000 

622 

IHD 04100 

1948 
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SOURCE STATEMENT LIBRARY 


r- t-1 

|Macro|Elocks| 

v -+--i 

| 1 | 25 i 

L_X_J 


Sample Proble m 

Z.CB1 
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SAMPLE PROBLEM SUM MAR Y 

Program Name is Z.CB1. The COBCL sample prctleir generates and prints a 
table of weekly, monthly, and annual salaries based on ten- dollar 
increments in monthly salary from $500 to $1000. Figure 16-1 defines 
the files required. Figure 16-2 illustrates the card deck for the COBCL 
sample problem that is retrieved from the source statement library. 


r 

T 





| Disk Extent 

Number 



j.- 

T 

T 

"T T 

j Phase 

1 1 

1 2 

1 3 

| 4 | 5 

I-- 

4 

4 

4 

-4 -4- 

| Corrpi le 

|SYSLNK 

l 

| SYS001 

|SYS 00 2 

l 

|SYS003 I SYS 004 

i i 

|Link Edit 

i 

|SYSLNK 

l 

i 

|SYS001 

1 

1 

i 

i i 

i - i 

i i 

]Execute 

1 

1 

1 

1 

i 

i i 

i - i 

L 

i 

X 

X 

-X X 


Figure 16-1. COBOL—Sample Problem File Requirements 


r- t-t-1 

|Cards Retrieved |Card Cels.|Card Cels.| 

| | 73-76 | 77-80 | 

I--4-4- ^ 

ICATALS Z.CB1 | | | 

1BKEND Z.CEl | | | 

ICOBOL Source Deck | $452 |0001-0081 | 

j (81 cards) | | j 

|BKEND | | | 

L_ X _ X _ J 

Figure 16-2. COBOL--Sample Problem Card Deck 

To execute the COBOL sample problem, the following job control cards 
are needed: 

// JOB COBOL SAMPLE 

// OPTION LINK,LIST,LOG,LISTX,DUMP,SYM,ERRS 
// EXEC COBCL 

COBCL Source Deck (81 cards) 

/* 

// EXEC LNKEDT 

// ASSGN SYS004,X'cuu' (SYS004 must be assigned to printer designated as 

SYSLST during system generation) 

// EXEC 
/& 

S YSL O G Ou tput 

// JOB COBOL 
EOJ COBOL 
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S YSISI Ou t put Summary : 

• Job control cards 

• Source program listing 

• Data division storage map 

• Procedure division storage map 

• Diagnostics 

• Linkage editor storage map 

• Table of salaries generated by the program 

Note: output is on SYS004 (same as printer). 

WQRKFILES 

COBOL Workfiles (IBM 2311) 


Although the amount of COBOL work space depends mainly on the size of 
the object program, these general guidelines can be given: For a COBOL 
program of about 400 source statements, 10 tracks should be assigned tc 
SYSLNK, SYS001, SYS002, and SYS003. For a COBOL program of about 800 
source statements, 20 tracks should be assigned tc SYSLNK, SYS001, 
SYS002, and SYS003. 


COBOL Workfiles ( IBM 2314/2319) 


Although the amount of COBOL work space depends mainly cn the size of 
the object program, these general guidelines can be given: For a COBOL 
program of about 400 source statements, 5 tracks should be assigned to 
SYSLNK, SYS001, SYS002, and SYS003. For a CGBCL program of about 800 
source statements, 10 tracks should be assigned tc SYSLNK, SYS001, 
SYS002, and SYS003. 
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Module 17: COBOL and PL/I (D) DASD - 360N-CB-468 


Modular Outline 


Source Statement Library.272 

Kacrcs.272 
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SOURCE STATEMENT LIBRARY 


r- t-1 

| Macro | Elocks | 

j.--j.--j 

| 8 1 270 | 

L_i.-J 


Macros 


A.LOADA 
A.LODIS * 

A.RANDA 
A.RRUIS * 

A.RUADA 
A.RUAIS * 

A.SEQDA 
A.SRUIS * 

♦Used ty PL/I (D). 
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Module 18: COBOL LCP - 360N-CV-489 


Modular Outline 

Partition Size.274 

Cere Iirage Library.274 

Phases.274 

Relocatable Library.274 

Modules.274 

Linkage Edit Statements.274 

Delete Statements.274 

Source Statement Library.274 

Sample Problem.274 

Sample Problem Summary.275 

Wcrkfiles.276 

COBOL LCP (IBM 2311). 276 

COBOL LCP (IBM 2314/2319).276 
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PARTITION SIZE 


IKLBlB 

IKLBll 

18,176 bytes 


IKLB12 

IKLB13 

CORE IMAGE LIBRARY 


IKLB21 

IKLB22 

r t 

1 

IKLB23 

|Phases | 

Blocks | 

IKLB24 

1 H 

T ^ 


1 1 

2311 | 2314/| 

IKLB31 

1 1 

| 2319 | 

IKLB32 

h -~+~ 

-— — — ——-— — -| 

IKLB33 

1 25 | 

62 | 62 | 

IKLB34 

L JL 

L J 

IKLB35 

IKLB36 

IKLB37 

Phases 

LCPC 


IKLE4B 

IKLE4C 

IKLB4D 

LCPCOBDK 


IKLB4E 

LCPCOBTP 


IKLB4F 

LCPCOBll 


IKLB4G 

IKLB41 

LCPCOB12 

LCPCOB13 


IKLB42 

LCPCOB21 


IKLDAA 

LCPCOB22 


IKLDAB 

LCPCOB23 


IKLDAC 

IKLDOA 

LCPCOB24 


IKLDOB 

LCPCOB31 


IKLDlA 

LCPCOB32 


IKLD4A 

LCPCOB33 
■LCPCOB34 


IKLLCP 


LCPCOB 35 
LCPCOB36 
LCPCOB37 
LCPCOB4C 
LCPCOB4D 

LCPCOB4E 
LCPCOB4F 
LCPCOB4G 
LCPCOB41 
LCPCOB42 

LCPCOB43 DELETE IKL.ALL 


Linkage Edit Statements 


INCLUDE IKLLCP 
// EXEC LKKEDT 


D elete Statements 


R ELOC ATABLE LIBRARY 


r-T-1 

| Modules jBlocks| 

j.-4-^ 

| 33 | 461 | 

L_L_J 


SOU R CE STATEMENT LIBRARY 


r- t-1 

jMacro|Blocks | 

\ - 4 - 1 

| 1 | 38 | 

L_L_J 


Modules 


Sairple Prcklein 


IKLEOC 

IKLBOD Z.DLCP12 
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SAMPLE PROBLEM SUMMARY 


Program Name is Z.DLCP12. The sample program is a COECL D source program 
which is converted to American National Standard COBOL by the COBOL LCP 
program. 

Figure 18-1 defines the files required by this sample problem. Figure 
18-2 shows the sample problem card deck retrieved from the source statement 
library. 

r-1 

| Disk Extent Number | 

j.- T - T -^ 

| 1 | 2 | 3 | 

1 --+-+- ^ 

ISYS001 j SYS002 |SYS003 | 

L_i_J._J 

Figure 18-1. COEOL LCP—Sample Problem File Requirements 


■T-T-1 

Card Cels.(Card Cols. 
73-76 | 77-80 


(Cards Retrieved 


h 




ICATALS Z.DLCP12 
j BKEND Z.DLCP12 
(COEOL LCP Source 
( Deck (130 cards) 
j BKEND 

L_ 


I 

$489 (0001-0130 

I 

I 


Figure 18-2. COBOL LCP—Sample Problem Card Deck 

To execute the sample program, the following twe jet control cards are 
needed: 

// JOB DLCP12 
// EXEC LCPC 

LCP CCE=D,RESEQ,START=000000,INCR = 010 
Source Deck (130 cards) 

/* 

/& 


SYS LS T outp ut summary : 

• Job control cards 

• LCP option card (line number 00001). Options specified are for 
COBOL D, resequencing of the ID field of the source program, starting 
with 000000, and incrementing by 010. 

• Converted source program. When a line is changed, the original line is 
followed by the changed line. At the extreme right of the changed line 
is a word indicating the status of the line (CHANGED, INSERTED, 

DELETED), followed by a message number corresponding to the action 
taken. 

• Text of all messages issued by the program, in numerical order. 

• Line indicating the highest severity code issued by the program. 

N ote ; The sample program also produces a converted source deck on SYSPCH. 
If a deck is not desired, change the LCP eptien card to read as 
follows: 

LCP COE=D,RESEQ,START=00C000,INCR=010,NODECK 
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WORKFILES 


COBOL LCP (IBM 2311 ) 


LCP work space depends on the size of the source prograir to he converted, 
and, to a lesser extent, on the amount of main storage available for 
processing. Assuming a minimum storage area cf 18K and a source program of 
400 cards (20% of which must be converted), 4 tracks should be assigned to 
SYS001 and 25 tracks each tc SYS002 and SYS003. Fcr a source program cf 
800 cards, the allocation to SYS002 and SYS003 should be increased to 50 
tracks. 


C OBOL LCP (IBM 2314/2 319) 


LCP work space depends on the size of the source program to be converted, 
and, to a lesser extent, on the amount of main storage available fcr 
processing. Assuming a minimum storage area of 18K and a source program of 
400 cards (20% of which must be converted), 2 tracks should he assigned to 
SYS001 and 13 tracks each to SYS002 and SYS003. For a source program cf 
800 cards, the allocation tc SYS002 and SYS003 should be increased tc 25 
tracks. 
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Module 19: FORTRAN (BASIC) - 360N-FO-451 


Modular Outline 

Partition Size.278 

FORTRAN Compatibility.278 

Core Image Library.278 

Phases.278 

Relocatable Library.278 

Modules.278 

Linkage Edit Statements.278 

Delete Statements.278 

Subroutines.278 

Source Statement Library.279 

Sample Problem . ..27 9 

Sample Problem Summary.279 

SYSLOG Output.280 

SYSLST Output Summary.280 

Workfiles.280 

IBM 2311 . 280 

IBM 2314/2319 280 
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P ARTIT I ON SIZ E 


Pha ses 


10,240 bytes 


FORTRA N CO MPATI B ILITY 

The FORTRAN IV library contains a module, 
ILFACOM, to provide compatibility with 
Basic FORTRAN subprograms. Eecause of 
differences in design objectives, object 
modules produced by the FORTRAN and Basic 
FORTRAN compilers are not compatible 
without this interface. With it, 
subprograms compiled under Basic FORTRAN 
can be incorporated into a FORTRAN program. 

The compatibility module can be invoked 
on a job-by-job basis, or the system can be 
altered at system generation time so that 
it is brought in with all Basic FORTRAN 
linkage edits. The procedure for using it 
for a single job is discussed in the 
F ORTRAN IV Programmer's Guide , listed in 
the Preface. 

The system can be altered permanently by 
executing the jobstrearc bock named 
Z.ILFMERGE which is in the source statement 
library of the DOS system residence volume 
supplied by IBM. This action deletes all 
Basic FORTRAN object time library routines 
from the relocatable library. It replaces 
them with references to the corresponding 
FORTRAN object time library routines and tc 
ILFACOM. Subsequently, any Easic FORTRAN 
object module that refers tc a library 
routine, such as the square root 
subprogram, IJTSSQT, actually uses the 
corresponding FORTRAN routine, in this 
case, ILFSSQRT. 

This procedure is recommended cnly for 
installations that intend to convert 
entirely from Basic FORTRAN to FORTRAN, but 
do not want to recompile existing programs 
and subprograms. The action provides 
additional space in the relocatable library 
by eliminating the Basic FORTRAN routines, 
but it also increases the execution time of 
all Basic FORTRAN modules. 


CORE_IMAGE_LIBRARY 


r---1 

| Blocks | 

r- t-t—*- ] 

(Phases | 2311 ( 2314/| 

I I I 2319 | 

j.-f-i--i 

| 4 I 20 1 20 I 

i_x_x-J 


FORTRAN 

FORTREL 

FORTRGE 

FORTRPU 


RELOCATABLE LIBRARY 


f-T-T-1 

j | Modules ( Blocks j 

| |--4-.| 

(FORTRAN, Basic: | 5 j 143 j 

( Subroutine | 37 (149 j 

i_x-x_J 


Modules 


IJTFO 
IJTFOl 
IJTFC2 
IJTFO3 
IJTFC4 


Linkage Edit Statements 


INCLUDE IJTFO 
// EXEC LNKEDT 


Del e te S tatements 


EELETR IJTFO 
DELETR IJTFOl 
EELETR IJTF02 
DELETR IJTF03 
DELETR IJTF04 
or 

EELETR IJT.ALL 
SUBROUTINES 


Mod ule N ame 

IJTAAFR 

IJTACCM 

IJTACON 

IJTADIR 

IJTADXD 

IJTADXI 

IJTAIXI 

IJTAPST 

IJTARBE 

IJTARXI 


Compiler Cnly 


Bytes cf 
Main S torage 

153 

2492 

2464 

1120 

200 

140 

156 

144 

1002 

136 
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IJTARXR 

204 

IJTSLOG 


257 

IJTDVCK 

60 

IJTSMX0 


185 

IJTEXPN 

280 

IJTSMX1 


185 

IJTFDMP 

644 

IJTSSCN 


276 

IJTFIOS 

3762 

IJTSSQT 


188 



IJTSTAN 


192 

IJTFXIT 

24 

IJTSTNH 


260 

IJTHEXC 

140 




IJTIFIX 

112 




IJTLEXP 

476 

SOURCE ; 

STATEMENT 

LIBRARY 

IJTLLOG 

365 






r 

T 

"1 

IJTLSCN 

388 

|Macros 

| Blocks 

1 

IJTLSQT 

164 

b - 

-+- 

-i 

IJTLTAN 

312 

1 1 

1 5 

1 

IJTLTNH 

332 

i 

X 

. J 

IJTMAXD 

101 




IJTMODI 

50 




IJTMODR 

104 

Sarrple_ 

Problem 


IJTOVRF 

76 




IJTSINT 

68 




IJTSLIT 

178 

Z.F01 




SAMPLE PROBLEM SUMMA RY : 

Prograir Name is Z.F01. 

Problem Summary: Program Narre is Z.F01. The Basic FORTRAN sample 
problem generates all prime numbers between 0 and 1000. Figure 19-1 
defines the files required by the sample problem. Figure 19-2 
illustrates the card deck retrieved frcir the source statement library. 

r- t-1 

| | Disk Extent No. | 

I h- t --i 

I Phase j 1 I 2 j 

j.-1--j.-.j 

jcoirpile | SYSLNK | SYSQ01 j 

I Link Edit j SYSLNK | SYS001 | 

j Execute | - | | 

L_X_J_J 


Figure 19-1. FORTRAN (Basic)--Sample Problem File Requirements 


Cards 

Retrieved 


| Card Columns 
73 - 76 


Card Columns 
77 - 80 


H 


CATALS Z.FC1 
EKENC Z.FC1 
FORTRAN Source Deck 
(Basic) 

BKEND 


(22 cards) 


$451 


0001 - 0022 


Figure 19-2. FORTRAN (Basic)--Sample Problem Card Deck 
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To execute the Basic FORTRAN sample problem, the following job 
control cards are needed: 

// JOB FORTRAN SAMPLE 
// OPTION LINK,LIST,LOG 
// EXEC FORTRAN 

FORTRAN (Easic) Source Leek (22 cards) 

/* 

// EXEC LNKECT 
// EXEC 
/& 

SYSLOG_Output 

// JOB FORTRAN SAMPLE 
EOJ FORTRAN 

S YS LS T Ou tput S ummary : 

• Job control cards 

• Source program listing 

• Object program storage irap 

• Linkage editor storage map 

• List of prime numbers generated by the program 


WORKFILES 

IBM_2311 


For a Easic FORTRAN program, 4 tracks should be assigned to SYSLNK and 
SYSC01 for every 100 source statements. 


IBM 2314/2319 


For a Easic FORTRAN program, 2 tracks should be assigned to SYST.NK and 
to SYS001 for every 100 source statements. 
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Module 20: FORTRAN IV - 360N-FO-479 


Modular Outline 

Partition Size.282 

FORTRAN Compatibility.282 

Core Image Library.282 

Phases.282 

Relocatable Library.282 

Modules.282 

Linkage Edit Statements.282 

Delete Statements.282 

Source Statement Library.282 

Macro.283 

Sample Problem.283 

Sample Program Summary.283 

SYSLOG Output.2 83 

SYSLST Output Summary.283 

Wcrkfiles.283 

FORTRAN Workfiles (IEM 2311) . . . .283 

FORTRAN Workfiles (IEM 2314/2319) .283 
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P ARTI TION SIZE 


P has es 


40,960 bytes 


FOR TRAN COMPATIBILITY 

The FORTRAN library contains a module, 
ILFACOM, to provide compatibility with 
Easic FORTRAN subprograms. Because of 
differences in design objectives, object 
modules produced by the FORTRAN and Basic 
FORTRAN compilers are not compatible 
without this interface. With it, 
subprograms compiled under Easic FORTRAN 
can be incorporated into a FORTRAN program. 

The compatibility module can be invoked 
on a job-by-job basis, or the system can be 
altered at system generation time so that 
it is brought in with all Easic FORTRAN 
linkage edits. The procedure fcr using it 
for a single job is discussed in the 
F ORTRAN I V Prog rammer's Gu id e, listed in 
the Preface. 


FFORTRAN 

FFORTRBK 

FFORTl 

FFORT2 

FFORT3 

FFORT4 

FF0RT5 

FFORT9 


REICCATABIE 1IBRARY 


r- t-1 

| Nodules|Blocks| 

*-4--I 

| 9 | 316 | 

L_ L-J 


Modules 


The system can be altered permanently by 
executing the jobstream book named 
Z.ILFMERGE which is in the source statement 
library of the BOS system residence volume 
supplied by IBM. This action deletes all 
Easic FORTRAN object time library routines 
from the relocatable library. It replaces 
them with references to the corresponding 
FORTRAN object time library routines and to 
ILFACOM. Subsequently, any Easic FORTRAN 
object module that refers to a library 
routine, such as the square root 
subprogram, IJTSSQT, actually uses the 
corresponding FORTRAN routine, in this 
case, ILFSSQRT. 


IIFAII 
ILFEXT 
ILFFC 
ILFFORT 
ILFGEN 

IIFPAR 
ILFRCL 
ILFTRBK 
ILFUNF 


Linkage E dit S t ate men ts 


This procedure is recommended only for 
installations that intend to convert 
entirely from Basic FORTRAN to FORTRAN, but 
do not want to recompile existing programs 
and subprograms. The action provides 
additional space in the relocatable library 
by eliminating the Basic FORTRAN routines, 
but it also increases the execution time of 
all Basic FORTRAN modules. 


CORE IMAGE LIBRARY 


r-1 

j Blocks | 


r 

_ T _ 


r - 

i 

| Phases 

1 

2311 

1 

2314/} 

1 

1 


1 

2319 | 

j.- 

-f- 

— 

-4- 

--f 

1 8 

1 

43 

1 

43 j 

i 

-JL. 


_ ± . 

j 


INCLUDE ILFFO 
// EXEC LNKEDT 


D elete St ateme n ts 


EELETR ILFFC 
DELETR ILFFORT 
DELETR ILFPAR 
EELETR ILFALL 
DELETR ILFUNF 
DELETR ILFGEN 
EELETR ILFEXT 
DELETR ILFRCL 
EELETS Z.ILFMERGE 
(Compatibility 
Merge Book) 


SOU R CE STATEMENT L I BRAR Y 
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r - T --j Tc execute the Fortran IV sample 

j Macros|Blocks| problem, the following jcb control 


J--j---J statements are needed: 

I 2 | 15 | 

L-J.-J // JCB FCR1RAN4 SAMPLE 

// OPTION LINK,LIST,ICG 
// EXEC FFORTRAN 

FORTRAN IV Source Deck (22 cards) 

Macro /* 

// EXEC LNKEDT 
// EXEC 

Z.ILFMERGE /* 

/£ 


S ample Pr ob le m 

Z.ILFSAMPL 


SYSLCG Outpu t 

// JCB FCRTRAN4 SAMPLE 
EOJ FORTRAN4 


SAMIPLE PROGRAM SUMM1ARY 

Program Name is Z.ILFSAMPL. This sample 
problem generates all prime numbers between 
2 and 1000. Figure 20-1 defines the files 
required by the sample problem. Figure 
20-2 illustrates the cards punched when the 
sample program is retrieved from the source 
statement library. 



T ~ ~ 

| Disk 

L 

Extent Number 

Phase 

I T 

1 1 1 

1 | 

T 

2 1 

_ _ . |. 

3 

Compile 

1 T 

|SYSLNK| 

i i 

SYS001| 

I 

SYS002 

Link Edit 

i i 

|SYSLNK| 

i 1 

i 

SYS001 | 

1 

- 

Execute 

1 1 

1 - 1 

1 

- I 

_ 


J. i. 

X- 



Figure 20-1. FORTRAN IV--Sample Problem 
File Requirement 


r- 

1 Cards 


T-T-T 

| Card cels.jCard Cols.j 


| Retrieved 

i . _ 

1 

i 

73-76 

i 77-8 

j.. 

1 

ICATALS Z.ILFSAMPL 

T 

1 


1 

1 

j BKEND Z.ILFSAMPL 

1 


1 

jFORTRAN IV Source 

1 


1 

j Deck (22 cards) 

1 

$479 

|0001-0022 

|BKEND 

i 


1 

L _ _ 

_JL_ 


± 


\ 

I 

I 

I 


Figure 20-2. FORTRAN IV--Sample Problem 
Card Deck 


S YSLST Output Summary 

• Job control cards 

• Source program listing 

• Object program storage map 

• Linkage editor storage map 

• List cf prime numbers generated by the 
program 


WORKFILES 


F ORTRAN werkfiles (IBM 2311) 


For a FORTRAN program, six tracks should be 
assigned tc SYSLNK and feur tracks each to 
SYS001 and SYS002 for every 100 source 
statements. 


FOR TRAN Workfiles ( IBM 2314 /2319) 


For FORTRAN program, three tracks should be 
assigned to SYSLNK and two tracks each to 
SYS001 and SYS002 for every 100 source 
statements. 
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Module 21: FORTRAN IV Subroutines--360N-LM-480 


Modular Outline 


FORTRAN Compatibility.286 

Relocatable Library.286 

FORTRAN IV Subroutines.286 


Module 21: FORTRAN IV Subroutines 


360N-LM-480 285 






FORTRAN COMPATIBILITY 


The FORTRAN IV library contains a module, ILFACCM, to provide compatibility 
with Basic FORTRAN subprograms. Because of differences in design 
objectives, object modules produced by the FORTRAN and Easic FORTRAN 
compilers are not compatible without this interface. With it, subprograms 
compiled under Easic FORTRAN can be incorporated into a FORTRAN program. 

The compatibility module can be invoked cn a jct-by-job basis, or the 
system can be altered at system generation time sc that it is brought in 
with all Basic FORTRAN linkage edits. The procedure for using it for a 
single job is discussed in the FORTR A N IV Programmer’s Guide , listed in the 
Preface. 

The system can be altered permanently by executing the jobstream bock 
named Z.ILFMERGE which is in the source statement library of the DOS system 
residence volume supplied by IBM. This action deletes all Basic FORTRAN 
object time library routines frcm the relocatable library. It replaces 
them with references to the corresponding FORTRAN object time library 
routines and to ILFACOM. Subsequently, any Easic FORTRAN object module 
that refers to a library routine, such as the square root subprogram, 
IJTSSQT, actually uses the corresponding FORTRAN routine, in this case, 
ILFSSQRT. 

This procedure is recommended only for installations that intend to 
convert entirely from Basic FORTRAN to FORTRAN, but dc net want to 
recompile existing programs and subprograms. The action provides 
additional space in the relocatable library by eliminating the Basic 
FORTRAN routines, but it also increases the execution time of all Basic 
FORTRAN modules. 


RELOCATABLE L IERAR Y 


r- t-1 

|Modules|Blocks| 

j.- -j-- \ 

| 61 | 286 | 
L_I_J 


F OR TRAN IV Su brou tine s 


M od ule Nam e 

ILFACOM 

ILFADCON 

ILFCLAES 

ILFCLAS 

ILFCLEXP 

ILFCLLOG 

ILFCLSCN 

ILFCLSQT 

ILFCSAES 

ILFCSAS 

ILFCSEXP 

ILFCSLOG 

ILFCSSCN 

ILFCSSQT 

ILFEEBUG 


Bytes of 
M ain S tor ag e 

1472 

4333 

172 

216 

244 

260 

448 

200 

156 

196 

244 

248 

385 

188 

1885 
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ILFDIOCS 658 
ILFFCDXI 308 
ILFFCXPI 280 
ILFFDUMP 465 
ILFFDVCH 68 

ILFFDXPD 208 
ILFFDXPI 156 
ILFFEXIT 28 
ILFFINT 1482 
ILFFIOCS 3589 

ILFFIXPI 168 
ILFFMAXD 109 
ILFFMAXI 201 
ILFFMAXR 201 
ILFFOVER 80 

ILFFRXPI 148 
ILFFRXPR 212 
ILFFSLIT 186 
ILFGHTAB 256 
ILFIBCOM 4063 

ILFIBERR 206 
ILFLASON 400 
ILFLATN2 500 
ILFLERF 808 
ILFLEXP 460 

ILFLGAMA 728 
ILFLLOG 376 
ILFLSCN 400 
ILFLSGNH 332 
ILFLSQRT 150 

ILFLTANH 340 
ILFLTNCT 392 
ILFNAMEL 2222 
ILFSASCN 308 
ILFSATN2 365 

ILFSERF 456 
ILFSEXP 286 
ILFSGAMA 504 
ILFSLOG 268 
ILFSSCN 280 

ILFSSCNH 280 
ILFSSQRT 172 
ILFSTANH 264 
ILFSTNCT 296 
ILFTRBK 816 
ILFUNIAE 256 
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Module 22: PL/I (D) --360N-PL-464 


Modular Outline 

Variants of PL/I (D).290 

Variants of PL/I (D) Library . . . .290 
PL/I (D) and System Input/Output 

on Disk.290 

Core Image Library.2 91 

Phases.291 

Transients.292 

Relocatable Library.292 

Modules.2 92 

Linkage Edit Statements.2 93 

For the IJXA00 (10K Variant) . . . .293 
For the IJXA00D (12K Variant) . . .293 

Delete Statement.293 

PL/I (D) Subroutines.293 

Source Statement Library.294 

Macro.2 94 

Sample Problem.294 

Sample Problem Summary.2 94 

SYSL03 Output.294 

SYSLST Output Summary.2 95 

Workfiles.295 

PL/I (D) Workfiles (IBM 2311) . . .295 

PL/I (D) Workfiles (IBM 2314/2319) .295 
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Prior to systeir generation, decide which 
PL/I (D) variant you desire and in which 
library the chosen variant resides. 


V ARIA NTS OF PL/I (D) 

Two variants of the PL/I (D) compiler can 
be built. Gne of the PL/I (E) variants 
requires 10K bytes (of problem program 
storage), while the other requires 12K. 

The 12K variant allows the systeir input and 
output files to be assigned to a 2311 disk 
drive or a 2314/2319, if the supervisor 
supports SYSEIL. PL/I (D) is capable of 
using either disk or tape workfiles, as are 
other compilers. Thus, PL/I (D) also 
furnishes compile-tirne device independence 
for workfiles. 


V aria nts of PL/ I (D) . Li brary 


Two variants of the regional transmitter 
are distributed: IJKTRGZ for overlapped, 
and IJKTRGM for non-overlapped. However, 
only one standard call is used at object 
time, which is for IJKTRGM. If the overlap 
version is required, the RENAMR function 
must be used to rename IJKTRGZ to IJKTRGM. 
When IJKTRGZ is used, special programming 
logic must be employed which compensates 
for the overlap mode (e.g., the last record 
is only written during CLOSE; therefore, 
any conditions arising are not signaled to 
your program). 


PL/I_£D)_ an d System Inp ut/ Cutput on Disk 


The two variants of the PL/I (D) compiler 
differ in their treatment of SYSIPT, 

SYSLST, and SYSPCH. If one or more of 
these logical units are assigned tc a 2311 
during compilation, the variant of the PL/I 
(D) compiler requiring 24K bytes of main 
storage (12K for the compiler itself), must 
be built. 


If either SYSIPT or SYSLST is assigned 
tc a 2311 cr 2314/2319 for execution of 
PL/I (D) object programs, the I/O modules 
invoked to support these assignments must 
be retained. During system generation, a 
relocatable library maintenance run should 
be performed to rename these modules before 
deleting the PL/I (D) compiler from the 
relocatable library. The following control 
statements delete the I/O modules that do 
not support the disk facility from the 
relocatable library (because they are no 
longer needed), rename the PL/I (D) object 
time I/O modules that dc support the disk 
facility, and delete the PL/I (D) compiler 
frcm the relocatable library: 


// EXEC MAINT 

DEIET'R IJKSYSA, IJKSYSI 

RENAMR IJXSYSA,IJKSYSA,IJXSYSI,IJKSYSI 
DEIETR IJX.ALL 

You may want to retain the card modules 
that dc net support the disk facility (if 
there is a possibility that card or tape 
input only and printer or tape output only 
are desired at some future time). The 
following control statements permit 
punching these modules. Punch these 
modules before they are deleted from the 
relocatable library as shown in the 
preceding example. 

// EXEC RSERV 

PUNCH IJKSYSA,IJKSYSI 

/* 

If neither SYSIPT nor SYSLST is assigned to 
a 2311 cr 2314/2319 during execution of 
FL/I (D) object programs, only the DELETE 
IJX.ALL statement is required for the 
maintenance run. 

During system generation, utilities and 
werkfile variants that are net needed can 
be deleted. If the system volume received 
is a disk pack, it is capable of operating 
as a system. If the system volume is a 
tape reel, it is self-loading tape that 
must be restored onto a disk pack before it 
is cperable. 
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CORE IMAGE LIBRARY 


PL/IC60 

PI/IC65 


r-1 


I 

Blocks | 

PL/IC85 

r f 

- t -i 

PL/IC86 

|Phases| 

1 ! 

2311j 2314/j 

PL/IC95 

| 2319| 

PL/IDOO 

r -+-f 

- i ^1 

PL/IB03 

|PL/I (D) j 110 | 

278| 28 2 J 


| Transients j 1 | 

1| 1| 

FL/IC05 

L II 

Phases 

i J 

PL/ID10 

PL/IDll 

PL/IB12 

PL/ID15 

PL/IC17 

PL/ID20 

PL/I 


PL/IC20A 

PL/IA10 


PI/ID40 

PL/IA20 

PL/IA25 


PL/ID70 

PL/IA27 


FL/IB75 

PL/ID80 

PL/IA30 


PL/IE25 

PL/IA35 


PL/IE25A 

PL/IA45 

PL/IA50 


PL/IE25E 

PL/IA60 


PL/IE25C 

PL/IE25D 

PL/IA65 


FL/IE25E 

PL/IB10 


PL/IE25F 

PL/IB15 

PL/IB20 


PL/IE25G 

PL/IB25 


PL/IE25H 

FL/IE25I 

PL/IB25A 


PL/IE25J 

PL/IB30 


FL/IE25K 

PL/IB40 

PL/IB70 


FL/IE50 

PL/IB75 


PL/IE55 
FL/IE60 

PL/IBS 0 


PL/IE60A 

PL/IE85 


PL/IF25 

PL/IB85A 

PL/IB87 


PL/IF35 

PL/IB 90 


PL/IF50 
PL/IF75 

PL/IB92 


PL/IE90 

PL/IB95 


P1/IF95 

PL/IB 97 

PL/ICO0 


FL/IGOO 

PL/ICO3 


PL/IG01 

PL/IG15 

PL/IC25 


PL/IG16 

PL/IC3 0 


PL/IG17 

PL/IC31 

PL/IC32 


PL/IG17B 

PL/IC33 


FL/IG17D 

PL/IG17E 

PL/IC34 


PL/IG17R 

PL/IC34A 


PL/IG17S 

PL/IC34B 

PL/IC35 


PL/IG17X 

PL/IC37 


PL/IG17Y 

PL/IG20 

PL/IC40 


PL/IG25 

PL/ICS 0 


PL/IG30 

PL/IC55 


PL/IG31 
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PL/IG40 IJXB40 

PL/IG55 IJXB70 

$1JKSOO IJXB75 

$1JKSIO IJXB80 

$1JKS20 IJXB85 

$1JKS30 IJXB87 

$1JKS40 IJXB90 

$IJKS50 IJXB92 

$1JKS6 0 IJXB95 

$1JKS70 IJXB97 

Note : The $$ and $ phases are cataloged IJXCOO 

into the core iirage library along IJXC03 

with the compiler. IJXC25 

IJXC30 

IJXC31 


T rans ie nt s IJXC 3 2 

IJXC33 

IJXC34 

$$BPLOSE IJXC34A 

IJXC34E 


R ELO CATABLE L IBRA RY 


f-T- 1 

| Modules | Blocks | 

[ PL/I (D) T 115 ] 2335 j 

I Subroutines | 95 | 360 | 

l- ± _j._j 


IJXC 35 
IJXC37 
IJXC40 
IJXC 50 
IJXC55 

IJXC60 
IJXC 65 
IJXC 85 
IJXC86 
IJXC 95 


Modules 


IJXA00 


IJXA00D 


Note: 


IJXA10 

IJXA20 

IJXA25 

IJXA27 

IJXA30 

IJXA35 

IJXA45 

IJXA50 

IJXA60 

IJXA65 

IJXB10 
IJXE15 
IJXB20 
IJXE25 
IJXB 30 


IJXD00 

IJXD03 

IJXD05 

IJXD10 

IJXD11 

IJXD12 

IJXD15 

IJXD17 

IJXB20 

IJXD20A 

IJXD40 

IJXD70 

IJXB75 

IJXD80 

IJXE25 

IJXE25A 

IJXE25B 

IJXE25C 

IJXE25D 

IJXE25E 

IJXE25F 

IJXE25G 

IJXE25H 

IJXE25I 

IJXE25J 

IJXE25K 

IJXE50 


PL/I (D) (SYSIPT, SYSPCH, SYSLST, 
ne ver on a disk device 

PL/I (B) (SYSIPT, SYSPCH, SYSLST, 
may be on a disk device 

The two variants differ in the first 
phase (PL/I (D) only. The following 
list applies to either variant. 
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IJXE55 

IJXE60 

IJXE61 


For the IJXAQOD (12K Var ia nt) 
INCLUDE IJXPLID 
// EXEC LNKEDT 


IJXE25 


IJXF35 

Delete Statement 

IJXF50 



IJXF75 



IJXF90 

EELETR IJX. 

ALL,IJK.ALL 

IJXF95 

PL/I (D) SUBROUTINES 

IJXGOO 



IJXG01 


Bytes cf 

IJXG15 

Module Name 

Main Stcra' 

IJXG16 




IJKEXHC 

1264 

IJXG17 

IJKQALM 

456 

IJXG17B 

IJKQASM 

256 

IJXG17D 

IJKQBIA 

280 

IJXG17E 

IJKQESA 

208 

IJXG17R 




IJKQCLA 

288 

IJXG17S 

IJKQCSA 

208 

IJXG17X 

IJK^ELA 

288 

IJXG17Y 

IJKQDSA 

208 

IJXG20 

IJKQLLA 

384 

IJXG25 




IJKQLSA 

272 

IJXG30 

Ijkcnid 

608 

IJXG31 

IJKQNSD 

480 

IJXG40 

IJKQQLM 

160 

IJXG55 

IJKQQSM 

176 

IJXPLID 

IJKQRLB 

768 

IJXPLI1 

IJKQRSB 

408 

IJXPLI2 

IJKQSLD 

416 

* IJXPLOSE 

IJKQSSD 

304 


ijkcteb 

360 

* IJXSOO 



* IJXS10 

IJKQTSB 

280 

* IJXS20 

IJKREBM 

424 

* IJXS30 

IJKRBIK 

292 

* IJXS40 

IJKREKA 

292 


IJKREBM 

92 

* IJXS50 



* IJXS60 

IJKRELM 

152 

* IJXS70 

IJKREPM 

140 

♦ ♦ IJXSYSA 

IJKRESM 

144 

** IJXSYSI 

IJKRGIM 

108 


IJKRGKM 

84 

* At system generation time, these phases 



are cataloged into the cere irrage library 

IJKRMIBX 

278 

along with the PL/I (D) compiler. 

IJKRMLX 

172 


IJKRMPX 

386 

♦♦Subroutines for 2311: IJXSYSA and 

IJKRMSX 

132 

IJXSYSI should be either renamed tc 

IJKRSBM 

196 

replace IJKSYSA or IJKSYSI, respectively. 



or deleted from the operational volume. 

IJKRSLM 

208 


IJKRSPM 

265 


IJKRSSM 

200 

Linkage Edit Statements 

IJKRUBM 

148 


IJKRWBM 

356 

For the IJXAOO (10K Variant) 

IJKRfoLM 

244 

INCLUDE IJXPLIl 

IJKRKPM 

577 

// EXEC LNKEDT 

IJKRWSM 

236 

INCLUDE IJXPLI2 

IJKRXLM 

168 

// EXEC LNKEDT 

IJKRXSA 

152 
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IJKSDMP 

52 

IJKSDTM 

58 

IJKSTMM 

104 

IJKSYSA 

201 

IJKSYSI 

152 


Macro 


A.IJKZL 


IJKSZBA 

1804 

IJKSZCA 

1716 

IJKSZLM 

60 

IJKTCBM 

586 

IJKTCUM 

264 


Sam pl e Pr oblem 


Z.PI1 


IJKTDIM 

540 

IJKTDPD 

184 

IJKTFDM 

480 

IJKTFMM 

196 

IJKTGDI 

438 


SAMPLE_PRCELEM_SUMMARY 

Program Name is Z.PL1. The PL/I (D) sample 
problem produces a table of mathematical 
functions: 


IJKTLCM 

876 

IJKTLIM 

1158 

IJKTLOM 

1076 

IJKTLTB 

7 

IJKTPSM 

72 


IJKTRGM 

390 

IJKTRGZ 

398 

IJKTRON 

1416 

IJKTSIM 

668 

IJKTSTM 

674 

IJKTXCF 

702 

IJKTXRM 

420 

IJKTXRN 

410 

IJKVBCM 

60 

IJKVBTM 

132 


IJKVCBM 

238 

IJKVCEM 

1024 

IJKVCFM 

680 

IJKVCPM 

214 

IJKVCTM 

392 


SQRT (x 2 + l) ,x 2 ,x 3 , SIN (x) ,CCS(x),SQRT(x) and 
SQRT(x 3 ). 

Figure 22-1 illustrates the card deck 
punched when the sample problem is 
retrieved from the source statement 
library. 


Card 

Retrieved 


Card Cols. 
73-76 


Card Cels, 
77-80 


CATALS Z.PL1 
EKEND Z.PL1 
PL/I (D) Source 
Deck (38 cards) 
♦END SOURCE 
DECK/EEGIN INPUT 
DATA 

PL/I (D) data 
(1 card) 

EKEND 


$464 


0001-0038 


IJKVECM 

404 

IJKVFCM 

536 

IJKVGIM 

254 

IJKVIGM 

148 

IJKVIIM 

236 


IJKVNPM 

376 

IJKVPCM 

68 

IJKVPNM 

316 

IJKVPRM 

1252 

IJKVRPM 

796 


IJKVTBM 

228 

IJKVTCM 

320 

IJKXTBM 

128 

IJXSYSA 

201 

IJXSYSI 

224 


SOURCE STATEMENT LIBRARY 


Figure 22-1. PL/I (D) --Sample Problem 
Card Deck 

To execute the PL/I (C) sample problem, 
the following job control cards are needed 
(if the user has the 48-character chain, he 
should change the bOC parameter in the 
option card to 4 80: 


// 

JCB PL/I 

SAMPLE 

// 

OPTION LINK,NODECK,SYM,LI£TX,60C,XREF 

// 

EXEC 

FL/I 

* 

PROCE 

S £ 

STMT 


PL/I 

(D) 

Source Deck (38 Cards) 

/* 




// 

EXEC 

LKKEDT 

// 

EXEC 

PI/I 

(D) 

Data (1 Card) 

/* 




/£ 





r- t-i 

| Macros|Blocks| 

Y -4--I 

I 2 I 17 I 

L_ ± _J 


SYSLCG_Output: 

// JCB PL/I 
ECJ PL/I 


294 DOS Version 4 System Generation 

















SYSLST Output S uirimar y 

• Job control cards 

• Source program listing 

• Symbol table listing 

• Cross-reference listing 

• Diagnostics 

• Offset table listing 

• Object program listing 

• External symbol table 

• Block table (automatic storage 
requirements) 

• Linkage editor storage map 

• Table produced by object program 

WO RKF ILES 

P L/I (D ) Work files (I BM 2311 ) 

For each 100 PL/I (D) source statements, 
three tracks should be reserved fcr SYSLNK; 
five tracks for SYS001; and seven tracks 
each for SYS002 and SYS003. This estimate 
is based on the following assumptions: 

1. There are about 30 variable names per 
100 statements in the external 
procedure. 


2. The number of PL/I (D) syntactical 

elements per source statement (except 
DECLARE statements and format, lists) is 
about 10. For example, the statement 
A=B+C; 

has 6 syntactical elements, and the 
statement 

READ FILE (F) INTO (AREA7); 
has 10 syntactical elements. 


PL/ I (D) Work files (IBM 231 4/ 231 9) 


Fcr each 200 PL/I (D) statements, three 
tracks should be reserved for SYSLNK; five 
tracks fcr SYS001; and seven tracks each 
for SYS002 and SYS003. Phis estimate is 
based upcr the following assumptions: 


1. There are about 30 variable names per, 
100 statements in the external 
procedure. 


2. The number of PL/I (D) syntactical 

elements per source statement (except 
DECLARE statements and format lists) is 
about 10. For example, the statement 
A=B+C; 

has 6 syntactical elements; and the 
statement 

READ FILE (F) IKTC (AREA?); 
has 10 syntactical elements. 
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Module 23: RPG - 360N-RG-460 


Modular Outline 


Partition Size.298 

Cere Image Library.298 

Phases.298 

Relocatable Library.298 

Modules.298 

Linkage Edit Statements.299 

Delete Statement.299 

Source Statement Library.299 

Sample Problem.299 

Sample Problem Summary.299 

SYSLOS Output.300 

SYSLST Output Summary.300 

Wcrkfiles.300 

RPG tforkfiles (IBM 2311). 300 


RPG Workfiles (IBM 2314/2319) . . .300 
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PARTITION SIZE 




Modules 

10,240 bytes 





IJRRG 

IJROOO 

IJR010 

IJR020 

CORE IMAGE LIBRARY 




IJR025 






IJR030 

IJR039 


( I 

i 1 

Blocks 


i 

1 

IJR040 


1 1- 


T 

A 

IJR049 


|Phases | 

2311 

12314/1 

IJR050 


1 1 


| 2319 

i 



h 4 


4 - 

A 

IJR059 


1 28 j 

98 

| 101 

1 

IJR060 


L J. 



.j 

IJR069 

IJR070 

IJR079 






IJR080 

Phases 





IJR089 

IJR090 

IJR099 

RPG1 





IJR100 

RPG10010 

RPG10020 





IJR109 

RPG100 25 





IJR110 

RPG10030 





IJR119 

IJR120 

RPG10040 





IJR129 

RPG10050 

RPG10060 





IJR130 

RPG10070 





IJR139 

RPG10080 





IJR140 
IJR149 

RPG10090 

RPG10100 





IJR150 

RPG10110 





IJR159 

RPG10120 





IJR160 

RPG10130 





IJR169 

IJR170 

RPG10140 





IJR179 

RPG10150 
RPG1Q160 





IJR18A 

RPG10170 





IJR18F 

RPG1018A 





IJR18G 

IJR18H 

RPG1018G 





IJR180 

RPG10180 

RPG10190 





IJR189 

RPG10200 





IJR190 

RPG10210 





IJR199 
IJR200 

RPG10220 





IJR 209 

RPG10230 

RPG10240 





IJR210 
IJR219 

IJR 220 

IJR 229 

RELOCATABLE 

LIBRARY 




IJR 230 






IJR239 

j Modules|Blocks 1 




IJR 240 

h- 

4 -1 




IJR241 

j 6 0 

1 785 | 




IJR242 

L- 

J. j 




IJR 243 
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SOURCE STATEMENT LIBRARY 


IJR244 

IJR245 

IJR246 

IJR247 

IJR249 


r- t-1 

|Macro |Blocks| 

t-4--I 

| 1 i 13 | 

L_L_J 


L in ka ge Edi t Statements 


INCLUDE IJRRG 

// EXEC LNKECT Samp le Problem 


Z.RG1 

D el ete St atem en t 


CELETR IJR.ALL 


SAMPLE PROBLEM SUMMAR Y 

Program Name is Z.RG1. The RPG sample problem produces an accounts 
receivable register. Both the RPG source deck and data deck are 
retrieved from the maintenance volume under Retriev in g th e S a mple 
Probl em s in Module 1. Figure 23-1 defines the files required by this 
problem. Figure 23-2 illustrates the cards punched when the sample 
program is retrieved from the source statement library. 


r 

T 






1 

! 

Disk 

Extent Number 


i 

1 

1-- 

T 

T 

"T 

T 

-1 

| Phase 

1 i 

1 2 

1 3 

1 4 

1 5 

1 


4 

4 

4 

-4 

4 

4 

|Compile 

|SYSLNK 

|SYS001 

|SYS002 

|SYS003 

j SYS004 

l 

|Link Edit 

|SYSLNK 

|SYS001 

I 

1 - 

1 

1 

|Execute 

i 

1 

1 

1 

1 

I 

L 

X 

X 

X 

_x 

X 

j 


Figure 23-1. RPG—Sample Problem File Requirements 


T— - 1 

Card Cels. 
73-76 


Card 

Retrieved 

f- 

CATALS Z.RG1 
BKEND Z.RG1 
RPG Source Deck 
(45 cards) 

♦END SOURCE DECK/ 
BEGIN INPUT DATA 
RPG Data (13 cards) 
BKEND 


$460 


Figure 23-2. RPG—Sample Problem Card Deck 
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To execute the sample problem, the following job control cards are 
needed: 

// JOB RGP SAMPLE 
// OPTION LINK,DUMP 
// EXEC RPG 

RPG Source Deck (45 cards) 

/* 

// EXEC LNKEET 
// EXEC 

RPG Data (13 cards) 

/* 

/S 

SISIOG_Output 

// JOB RPG 
EOJ RPG 

SYSIST Ou tput S ummar y: 

• Job control cards 

• Source program listing 

• Symbol tables 

• Memory map 

• Linkage editor storage map 

• Accounts receivable register generated by program 


WORKFILES 

RPG Workfiles (IBM 2311) 


For an RPG program of about 150 source statements, eight tracks should 
be assigned to SYSLNK and tc SYS003, and three tracks tc SYS001 and to 
SYS002. 

For an RPG program of about 500 source statements, 22 tracks should 
be assigned to SYSLNK; 10 tracks to SYS001 and tc SYS002; and 26 tc 
SYS003 . 

For an PRG program of abcut 1,000 source statements, 44 tracks should 
be assigned to SYSLNK; 20 tracks each to SYSC01 and to SYS002; and 52 
tracks to SYS003. 


RPG Workfiles (IBM 2314/2319) 


For an RPG program of about 150 source statements, five tracks should be 
assigned to SYSLNK and to SYS003, and twc tracks tc SYS001 and tc 
SYS002. 

For a RPG program of about 500 source statements, 11 tracks should be 
assigned to SYSLNK, 5 tracks tc SYS001 and tc SYS002, and 13 tracks to 
SYS003 . 

For an RPG program of abcut 1,000 source statements, 22 tracks should 
be assigned to SYSLNK, 10 tracks to SYS001 and to SYS002, and 26 tracks 
to SYS003. 
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Module 24: Disk Sort/Merge — 360N-SM-450 


Modular Outline 

Partition Size.302 

Core Image Library.302 

Phases.302 

Relocatable Library.302 

Linkage Edit Statements.302 

Delete Statement.303 

Sample Problem ..303 

Sample Problem Summary.303 

SYSLOG Output.304 

SYSLST Output Summary.304 
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PA RTI TION SIZE 
10,240 bytes 

CORE IMAGE LIBRARY 


see L inkage Edit Statements . Thus, the 
nuirfcer 1 next to a module indicates that it 
is required by Program Number 1, which is 
the entire sort/merge prcgrarr. Where more 
than one program number appears next to a 
module, that module is required by all 
these programs. 



r 

T” 

1 


Proqram Number 



1 

1 

Blocks | 





1 

b 

T f 

IJOSM 

1 



|Phases 

1 

2311 j 2314/j 

IJOSMERG 

7 



1 

1 

[2319 | 

IJOSMFOR 

2 



j.- 

-4- 

-4-f 

IJOSMFOS 

5 



| 26 

1 

74 [76 | 

IJCSMFVS 

4 



e 

-X. 

X J 

IJOSMF23 

1,2,4,5 






IJOSMEHO 

1 through 

7 





IJOSMPHl 

1 through 

6 

Phases 




IJOSMPH4 

1,2,3,7 






IJCSMVCM 

3 






IJOSMVOS 

6 


DSORT 




IJOSMV23 

1,3,4,6 


DSORT002 







DSORT 003 




IJOSM001 

1 through 

7 

DSORT00 4 




IJOSM002 

1 through 

7 

DSORT'005 




IJCSM003 

1 through 

7 





IJOSM004 

1 through 

7 

DSORT006 




IJGSMG05 

1 through 

7 

DSORT007 







DSORT008 




IJOSM006 

1 through 

7 

DSORT009 




IJOSM007 

1 through 

7 

DSORT010 




IJOSM008 

1 through 

7 





IJOSM00 9 

1 through 

7 

DSORT101 




IJCSM010 

1 through 

7 

DSORTl02 







DSORTlO 3 




IJOSM101 

1 through 

6 

DSORT104 




IJOSM10 2 

1 through 

6 

DSORTl05 




IJCSM103 

1 through 

6 





IJOSM104 

1 through 

6 

DSORT201 




IJOSM105 

1 through 

6 

DSORT202 







DSORT203 




IJOSM201 

1,2 ,4,5 


DSORT204 




IJOSM202 

1,2,4,5 


DSORT301 




IJCSM203 

1,3,4,6 






IJOSM204 

1,3,4,6 


DSORT302 




IJOSM301 

1,2,4,5 


DSORT303 




IJOSM302 

1,2,4,5 


DSORT304 




IJCSM303 

1,3,4,6 


DSORT4 01 




IJOSM304 

1,3,4,6 


DSORT4 02 




IJOSM401 

1,2,3,7 


DSORT501 




IJOSM 402 

1,2,3,7 






IJOSM501 

1,2,4,5 



RELOCATABLE_LIBRARY 

r- t-1 

|Modules|Blocks| 

I--4--I 

| 38 | 521 | 

i_x_j 

Modules 

The program numbers given in the program 
numbers column identify the modules 
required to support the Disk Sort/Merge 
program(s) selected. For identification 
and descriptions of the referenced programs 


Lin ka ge Edit Statements 


The information given enables a user to 
linkage edit into the core image library 
only those modules required to tailor a 
generalized sort/merge pregram to specific 
jcb applications. At system generation 
time, the user can linkage edit any one cf 
seven distinct sort/merge object programs 
into the core image library. 
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The 

following programs can be generated 

Program 1. 

specify: 

INCLUDE IJOSM 

at 

linkage edit time: 



// EXEC LNKEET 

1. 

The entire sort/merge program. 







Program 2 . 

specify: 

INCLUDE IJOSNFOM 

2. 

A 

program that 



// EXEC LNKEET 


a. 

sorts fixed-length records; 





b. 

performs the ADDROUT option for 

Pregram 3. 

specify: 

INCLUDE IJCSKVCM 



fixed or variable-length record; 
and 



// EXEC LNKEDT 


c. 

merges fixed or variable-length 

Program 4. 

specify: 

INCLUDE IJOSMFVS 



records. 



// EXEC LNKEET 

3. 

A 

program that 

Pregram 5. 

specify: 

INCLUDE IJOSKFOS 


a. 

sorts variable-length records; 



// EXEC LNKEET 


b. 

performs the ADDROUT option for 
fixed or variable-length records; 

Program 6. 

specify: 

INCLUDE IJCSMVOS 



and 



// EXEC LNKEDT 


c. 

merges fixed or variable-length 
records. 

Program 7. 

specify: 

INCLUDE IJCSKERG 






// EXEC LNKEDT 

4. 

A 

program that 





a. 

sorts fixed or variable-length 
records; and 





b. 

performs the ADDROUT option for 






fixed or variable-length records. 

Delete Statement 


5. 

A 

program that 





a. 

sorts fixed-length records; and 

DELETR IJC 

.ALL 



b. 

performs the ADDROUT option for 
fixed or variable-length records. 






r 

■ — i ■ ■ 

l 




1 Macros 1 Blocks 1 

6. 

A 

program that 

f— 

f 

-H 


a. 

sorts variable-length records; and 

1 

1 | 2 

! 


b. 

performs the ADDROUT option for 

i_ 

X 

_j 


fixed or variable-length records. 


7. A program that merges fixed or 
variable-length records. 

The user should linkage edit only the 
sort/merge program that satisfies his 
particular requirements. Tc generate: 


Sample P rcblem 


Z.SM2 


S AM PLE PROBLEM SUM MAR Y 

Program Name is Z.SM2. The Disk Scrt/rrerge sample problem rearranges, 
in ascending sequence, the numbers generated by the Assembler 2 prcblem. 
Figure 24-1 defines the file requirements. figure 24-2 illustrates the 
card deck that is retrieved from the source statement library. 

r- 1 

(Disk Extent Number| 

j.- T --| 

| 1 | 2 | 

t-- + -1 

|SYS 002 iSYS004 | 

L_X_J 

Figure 24-1. DISK SORT/MERGE—Sample Problem File Requirements 
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Cards 

Retrieved 


f- 

|CATALS Z.SM2 
|BKEND Z.SM2 
jS/M Control Cards 
| (6 cards) 

|BKEND 

L_ 


Card Cels. 
73-76 


Card Cols. 
77-80 


Generates 

Input 

for 


$ 4 50 


0001-0006 


Disk-to-Printer 
Utility, Z.UIDKPR1 


Figure 24-2. DISK SORT/MERGE—Sairple Prcbleir Card Deck 

To execute the disk sort/irerge sarrple prcbleir, the following job 
control cards are needed: 

Col . 1 6 Ccl_ 1 _54 Cel. 72 

t ft 

// JOB DSORT 

// PAUSE ASSGN SYS002 AND SYS004 to SCRATCH PACK 
// ASSGN SYS002,X* cuu* 

// ASSGN SYS004,X'cuu’ 

// CLBL FILEA,'SAMPLE PROBLEM FILE OF 2000 RECORDS'[,yy/ddd] 

// EXTENT SYS002,hhhhhh,l,0,1800,43 

// CLBL FILEW,'SAMPLE PROBLEM WORK AREA FOR SORT RUN'[,yy/ddd] 

// EXTENT SYS002,hhhhhh,l,0,1843,23 

// CLBL FILEC,'SORTED FILE OF 2000 RECORDS FOR UTIIITIES'[,yy/ddd] 

// EXTENT SYS004,hhhhhh,l,0,1800,43 
// EXEC DSORT 

S/M Control Cards (6 cards) 

/* 

/s 

N ote : Replace hhhhhh in the EXTENT cards with the volume serial number 

of the disk pack. 


SXSLOG_Output 
// JOB DSORT 

// PAUSE ASSGN SYS002 AND SYS004 TO SCRATCH PACK 
EOJ DSORT 

S YSIS T Ou tp ut Summary : 

• Job control cards 

• Sort control cards 

• Sort parameters 

• Computed constants 
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Module 25: Tape and Disk Sort/Merge — 360N-SM-483 


Modular Outline 

Partition Size.306 

Core Image Library.306 

Phases.306 

Relocatable Library.306 

Modules.306 

Linkage Edit Statements.307 

Delete Statement.308 

Source Statement Library.308 

Sample Problems.308 

Sample Problem Summary.309 

Tape and Disk Sort/Merge — 2400 

Application.310 

SYSLOG Output.310 

SYSLST Output Summary.310 

Tape and Disk Sort/Merge—2311 

Application . 311 

SYSLOG Output.311 

SYSLST Output Summary.311 

Tape and Disk 

Scrt/Merge—2314/2319 Application .312 

SYSLOG Output.312 

SYSLST Output Summary.312 
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PARTITION SIZE 


• Tape 2311 Variant 10,240 bytes 

• 2314 Variant 22,528 bytes 

CORE_IMAGE_LIBRARY 

r- t-1 

j | Blocks | 

j (■- T - j 

(Phases | 2311 |2314/| 

I I 12319 | 

j.-1-j--f 

1 40 | 69 | 71 | 

L_J_J_J 


SORTRSJ 

SORTRSM 

SORTRSN 


RELCCATAEIE LIBRARY 


r- t-— i 

| Modules|Blocks| 

t-1- 

| 101 | 987 | 

L- x _J 


Kodules 


Phases 


SORT 

SORTASA 

SORTRAA 

SORTRAE 

SORTRAC 

SORTRAD 

SORTRBA 

SORTRBB 

SORTRBC 

SORTRBD 

SORTRCB 

SORTRCC 

SORTRCD 

SORTRCE 

SORTRSF 

SORTRCH 

SORTRCJ 

SORTRCK 

SORTRCL 

SORTRCN 

SORTRDA 

SORTRDB 

SORTRDC 

SORTRGA 

SORTRGB 

SORTRGG 

SORTRGH 

SORTRGF 

SORTROA 

SORTROB 

SORTROC 

SORTRPA 

SORTRPB 

SORTRSD 

SORTRSE 

SORTRSG 

SORTRSH 


The fcllcwing keys identify the irodules 
required to support the sort program 
selected; see L ink a ge Edit Sta t ements . 

Keys: A - All programs 

C - Direct Access (2311,2314/2319) 
Sort Programs 
M - Merge Program 
S - Entire Sort Program 
T - 2400 Sort Program 

Key 


ILHSAAC T 

ILHSAAD D 

ILHSABF S 

ILHSABG A 

ILHSAGD T 

ILHSAGE D 

ILHSAGF S 

ILHSAGG D 

ILHSAGH M 

ILHSALL S,M 

ILHSACB S 

ILHSACC A 

ILHSAPC T 

ILriSAPD D 

ILHSAPF S 

ILHSAPG D 

ILHSAPH M 

ILHSASA S 

ILHSASF S 

ILHSASG S 

ILHSASK A 

ILHSASL A 

ILHSD1 D 

ILHSD4 D 

ILHSMRG M 

ILHSNMPS* D 

ILHSCRT S 

ILHSPHN* D 

ILHSPH0 A 

ILHSPH0M M 

ILHSPH0S S 
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ILHSPHOT T 

ILHSPH 01 D 

ILHSPH04 D 

ILHSPHl S 

ILHSPH1T T 

ILHSPHll E 

ILHSPH14 D 

ILHSPH2 S 

ILHSPH2T T 

ILHSPH21 D 

ILHSPH24 D 

ILHSPH3 S,M 

ILHSPH3M M 

ILHSPH3S S 

ILHSPH3T T 

ILHSPH31 E 

ILHSPH34 D 

ILHSPPI A 

ILHSRAA T 

ILHSRAE E 

ILHSRAC T 

ILHSRAE E 

ILHSRBA S 

ILHSRBE T 

ILHSRBC D 

ILHSRBD S 

ILHSRBE S 

ILHSRBG A 

ILHSRCA A 

ILHSRCB A 

ILHSRCC A 

ILHSRCD A 

ILHSRGE T 

ILHSRCF E 

ILHSRCH ' M 

ILHSRCI A 

ILHSRCJ A 

ILHSRGK A 

ILHSRCL A 

ILHSRGM A 

ILHSRCN A 

ILHSRDA S 

ILHSRDE S 

ILHSRDC D 

ILHSRGA S 

ILHSRGB S 

ILHSRGD T 

ILHSRGE D 

ILHSRGF S 

ILHSRGG D 

ILHSRGH M 

ILHSRMC A,S 


ILHSRPC T 

ILHSRPD D 

ILHSRPE A 

ILHSRSD S 

ILHSRSE S 

ILHSRSG S 

ILHSRSH S 

ILHSRSI S 

ILHSRSJ A 

ILHSRSM M,S 

ILHSRSN A 

ILHSRTMG A 

ILHST T 


♦Required for systems without 
multiprogramming support. 


li nk a ge Edit Statements 


The infcrnation given enables a user to 
linkage edit into the core iirage library 
only these nodules required to tailor a 
generalized sert/merge program to specific 
job applications. At system generation 
time, the user can linkage edit any one of 
six distinct sort/merge object programs 
intc the cere image library. Associated 
with each sort program is a key. The key 
identifies the module(s) required to 
support the corresponding program. For 
example. Program Number 1 is the entire 
sort/merge program and is assigned the keys 
S, M. Thus, all modules identified by keys 
£ or M are required to support Program 
Number 1. See Re lo cat a ble Library for a 
complete description of the keys and a list 
cf the modules required tc support the disk 
sort/merge programs described. 

1. The entire sort/merge program (key = S, 

M) . 

2. The entire sort program (key = S). 

3. The merge program (key = M). 

4. A sort program that uses 2400 tape 
units as intermediate storage (key = 

T) . 

5. A sort program that uses 2311 direct 
access devices as intermediate storage 
(key = D). 

6. A sert program that uses 2314/2319 
direct access devices as intermediate 
storage (key = D). 


ILHSROA S 
ILHSROB S 
ILHSROC A 
ILHSRPA T 
ILHSRPB D 


To conserve library space, the user 
should linkage edit cnly the sort/merge 
program that satisfies his particular 
requirements. Note that an attempt to 
execute an option not selected results in 
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abnormal termination of the sort/irerge 
prograir. Tc generate: 


Program 1. specify: INCLUDE ILHSALL 
// EXEC LNKEBT 

Program 2. specify: INCLUDE ILHSCRT 
// EXEC LNKEDT 

Program 3. specify: INCLUDE ILHSWRG 
// EXEC LNKEDT 

Program 4. specify: INCLUDE ILHST 
// EXEC LNKEDT 

Program 5. specify: INCLUDE ILHSDl 
// EXEC LNKEBT 

Program 6. specify: INCLUDE ILHSD4 
// EXEC LNKEDT 

If the sort/merge program is generated 
in a system without multiprogramming 
support, the module ILHSNMPS must be 
linkage edited immediately after the 
selected program, such as: 

INCLUDE ILHSALL 
// EXEC LNKEDT 

INCLUDE ILHSNMFS 
// EXEC LNKEDT 


Not e: If standard label tapes are 

processed or a user's exit processes 
nonsequential disk labels, include a 
// LBLTYP in the linkage edit 
statements of the appropriate 
pregram. 


Delete Statement 


CELETR ILH.ALL 


SOURCE S TATEME N T LI B RARY 

r-r-1 

| Nacros|Blocks| 

\ - + - \ 

I 3 | 6 | 

L_I_J 


Sam ple Pr ob l em s 


Z. SIV!4 
Z.SM5 
Z.SK6 
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SAMPLE PROELEM SUMMARY 


Figure 25-1 defines the files required by the various sample problems. 
Figure 25-2 illustrates the card decks punched when the problems are 
retrieved frcm the source statement library. 

r-T-T-T 

|Sample | Disk | Tape Drive Number | 

| J.--f- T -T-T-T--I 

jProblem |Ext. #1| 1 j 2 | 3| 4 | 5 | 

j.-—|-j--f--|--i-i--1 

j Z.SM4 jSYSRES |SYS001 |SYS002 |SYS003jSYS004|SYSOO5| 

L_JL- X -J.--L--L-L-J 

N ote : Tape drive number refers to X'cuu* in the ASSGN card. 

Figure 25-1. TAPE and DISK SORT/MERGE—Sample Problems, File Requirements 
(Part 1 of 2) 


Sample 

T 

1 

L 

Disk 

Extent 

Number 

Problem 

r 

1 

1 

‘ T 

1 2 

T 

1 3 



— 


—+- 


|--+---f-+- 

|Z.SM5 till 


| and | SYS001 |SYS002 |SYS003 | 

IZ.SM6 I I I I 


L_J._ X _J._J 

Figure 25-1. TAPE and DISK SORT/MERGE--Sarople 


(Part 2 of 2) 


Problems, 


File Requirements 


r 

r 


— T 

T 


T 

■1 


1 


1 

1 

Secondary| 


| Cards 

|Card Cols 

. |Card Cols 


Storage 

|Generates Input 


j Retrieved 

1 

73-76 

1 77-80 

1 

Device 

| for 


L 

X 


1 

1 


l 

1 

r 

T 


~t 

T 


T 

1 

|CATALS Z.SM4 

1 


1 

1 


|Tape-to-Printer 


|BKEND Z.SM4 

1 


1 

1 


| Utility, 


|S/M Control Cards 

1 

$483 

| 0001-0006 

1 

2400 

|Z.UTTPPR2 


j (6 cards) 

1 


1 

1 


1 


|EKEND 

1 

1 


I 

i 

1 


1 

1 


|CATALS Z.SM5 

1 

1 


1 

1 

1 

1 


1 

|Disk-to-Printer 


1BKEND Z.SM5 

1 


1 

1 


| Utility, 


| S/M Control Cards 

1 

$483 

| 0101-0106 

1 

2311 

|Z.UTDKPR2 


j (6 cards) 

1 


1 

i 


1 


|EKEND 

1 

1 


1 

1 

1 


1 

1 


|CATALS Z.SM6 

1 

1 


1 

1 

1 

1 


1 

|Disk-to-Printer 


|BKEND Z.SM6 

! 


1 

1 


| Utility, 


|S/M Control Cards 

1 

$483 

|0201-0206 

I 

2314 

|Z.UTDKPR3 


| (6 cards) 

1 


1 

1 


1 


|BKEND 

1 


1 

1 


1 


l 

-X 


X 

-X 


X __ 



Figure 25-2. TAPE and DISK SORT/MERGE—Sample Problem Card Decks 
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TAPE AND DISK SORT/MERGE 


2400 APPLICATION 


Program Narce is Z.SM4. The Tape and Disk Sort/Merge sample problem 
rearranges, in ascending sequence, the records produced fcy the Assembler 4 
program and writes them on another tape, five records per block. 

To execute the Tape and Disk Sort/Merge sample problem, the following 
job control cards are needed: 

// JOB SORT 2400 

// PAUSE ASSGN SYS002 TO SAME DRIVE AS PREVIOUS JOB 
// PAUSE ASSGN SYS001,SYS003,SYS004,SYS005 TO EIFF TAPES 
// ASSGN SYSQ01,X *cuu * 

// ASSGN SYSC02,X 'cuu' 

// ASSGN SYS003,X'CUU' 

// ASSGN SYSC04,X'cuu' 

// ASSGN SYS005,X*cuu’ 

// TLBL SORTCUT,,64/001 
// TLBL SORTIN1,,64/001 
// TLBL SORTWKl,,64/001 
// TLBL SORTWK2,,64/001 
// TLBL SORTWK3,,64/001 
// LELTYP TAPE 
// EXEC SORT 

Sort/merge control cards (6 cards) 

/& 


SYSLOG_Output 
BG // JOB SORT 2400 

EG // PAUSE ASSGN SYS002 TO SAME DRIVE AS PREVIOUS JCB 
BG 

BG // PAUSE ASSGN SYS001,SYS003,SYSC04,SYS005 TO DIFF TAPES 
BG 

EG 79051 RCE IN0002000, OUT 002000, ESTIMATED 0000000 
BG 71011 END SORT PH 

EG 79051 RCE IN 0002000, OUT 0002000, ESTIMATED 0000000 
BG 72011 END MERGE PH 

EG 79051 RCE IN 0002000, OUT 0002000, ESTIMATED 0000000 
BG 73021 EOJ 
EG EOJ SORT 

SYSIST Ou tput S ummar y: 

• Job control cards 

• Sort control cards 

• Sort parameters 

• Computed constants 
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TAPE AND DISK SOR T/MERG E —231 1 APPLICATION 

Prograrr Naire is Z.SM5. The Tape and Disk Sort/Merge sample problem 
rearranges, in ascending sequence, the records produced fcy the Assembler 5 
program and writes them to a 2311 disk storage device. 

To execute the tape and disk scrt/merge sample problem, the following 
control cards are needed: 

Co l. 1 6 Col_r_54 Col. 72 

1 t I 

// JOB SORT 2311 

// PAUSE ASSGN SYS001,SYS002,SYS003 TO SCRATCH PACK 
// ASSGN SYS001 # X'CUU' 

// ASSGN SYSC02,X'CUU' 

// ASSGN SYS003,X 1 cuu' 

// DLBL SORTCUT,'SORTED FILE OF 2000 RECORDS FOR UTILITIES’[,yy/ddd] 

// EXTENT SYS001,hhhhhh,1,0,1710,33 

// SORTIN1,'SAMPLE PROBLEM FILE OF 2000 RECORDS’[,yy/dad] 

// EXTENT SYS002,hhhhhh,1,0,1800,43 

// DLBL SORTNKl,'SAMPLE PROGRAM WORK AREA FOR SORT RUN'[,yy/ddd] 

// EXTENT SYS003,hhhhhh,1,0,1843,33 
// EXEC SORT 

Sort/merge control cards (6 cards) 

/& 

Note: Replace hhhhhh in the EXTENT cards with the volume serial number of 

the disk pack. 


SYSLOG Out put 
BG // JOB SORT 2311 

BG // PAUSE ASSGN SYS001,SYS002,SYS003 TO SCRATCH PACK 
BG 

EG 79051 RCD IN 0002000, OUT 0002000, ESTIMATED 0002000 
BG 71011 END SORT PH 

BG 79051 RCD IN 0002000, OUT 0002000, ESTIMATED 0002000 
BG 72011 END MERGE PH 

BG 79051 RCD IN 0002000, OUT 0002000, ESTIMATED 0002000 
3G 73021 EOJ 
EG EOJ SORT 

S YS LS T Ou t put Summary : 

• Job control cards 

• Sort control cards 

• Sort parameters 

• Computed constants 
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T APE A MD DISK SORT/MERGE—2 31 4/2319 APPLICATION 

Program Name is Z.SM6. The Tape and Disk Sort/Merge sample problem 
rearranges the records produced by the Assembler 6 program in ascending 
sequence and writes them back to a 2314/2319 direct access storage 
facility. 

To execute the tape and disk sort/merge sample problem, the following 
job control cards are needed: 

Col. 16 Cel. 54 Cel. 72 

r t i 

// JOB SORT 2314/2319 

// PAUSE ASSGN SYS001,SYS002,SYS003 TO SCRATCH PACK 
// ASSGN SYS001,S' CUU * 

// ASSGN SYS002,X'cuu' 

// ASSGN SYS003,X'cuu* 

// DLBL SORTOUT,'SORTED FILE OF 2000 RECORDS FOR UTILITIES' [,yy/ddd] 

// EXTENT SYS001,hhhhhh,l,0,3420,63 

// DLBL SORTIN1,'SAMPLE PROBLEM FILE OF 2000 RECORDS'[,yy/ddd] 

// EXTENT SYS002,hhhhhh,l,0,3600,83 

// DLBL SORTWKl,'SAMPLE PROGRAM WORK AREA FOR SORT RUN'[,yy/ddd] 

// EXTENT SYS003,hhhhhh,l,0,3686,63 
// EXEC SORT 

Sort/merge control cards (6 cards) 

/& 

No te : Replace hhhhhh in the EXTENT cards with the volume serial number of 

the disk pack. 


S YS LO G Output 

BG // JOB SORT 2314/2319 

BG // .PAUSE ASSGN SYS001,SYS002,SYS003 TO SCRATCH PACK 
BG 


BG 

BG 

79051 

71011 

RCD 

END 

IN 0003000, 
SORT PH 

OUT 

0003000, 

ESTIMATED 

0003000 

BG 

BG 

79051 

72011 

RCD 

END 

IN 0003000, 
MERGE PH 

OUT 

0003000, 

ESTIMATED 

0003000 

BG 

BG 

79051 

73021 

RCD 

EOJ 

IN 0003000, 

OUT 

0003000, 

ESTIMATED 

0003000 


BG EOJ SORT 

S YSLS T Ou tput S ummar y: 

• Job control cards 

• Sort control cards 

• Sort parameters 

• Computed constants 
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Module 26: Tape Sort/Merge — 360N-SM-400 


Modular Outline 

Partition Size.314 

Cere Iirage Library.314 

Phases.314 

Relocatable Library.314 

Modules.314 

Linkage Edit Statement.314 

Delete Statement.314 

Source Statement Library.314 

Sample Problem.314 

Sample Problem Summary.314 

SYSLCG Output.315 

SYSLST Output Summary.315 
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PARTITION SIZE 


10,240 bytes 


CORE_IMAGE_LIBRAR^ 


r- t-1 

J Nodules j Blocks | 

*-+--i 

| 5 | 206 j 

L___ ± _J 


Modules 



■ T" 
1 

h 

Blocks 

; 1 

T -f 

IJPSM 

Phases 

1 

1 

2311 

|2314/j 
|2319 | 

IJPSM001 
IJPSM002 



— 

4 - i 

IJPSM003 

20 

1 

_r. 

36 

1 36 | 

JL J 

IJPSM004 


Phases 


Linkage Edit S tate m en t 


TSRT 

TSRTP002 

TSRTP003 

TSRTP004 

TSRTP005 

TSRTP006 
TSRTP007 
TSRTP008 
TSRTPl01 
TSRTP102 


INCLUDE IJPSM 
// 1BLTYP TAPE(nn) 
// EXEC LEKEDT 


Delete Statement 


DELETR IJP.ALL 


TSRTPl03 
TSRTPl04 
TSRTPl05 
TSRTP201 
TSRTP202 

TSRTP203 
TSRTP204 
TSRTP 3 01 
TSRTP302 
TSRTP303 


SOURCE STATEMENT LIBRARY 


r- r -1 

| Macros|Blocks| 

f-+--I 

I 1 | 2 j 

L_X_J 


Sampl e Prcfclem 


RELOCATABLE LIBRARY 


Z. SMI 


SAMPLE_PROBLEM_SUMMARY 

Program Name is Z.SMl. The Tape Sort/Merge sample problem rearranges the 
records produced by the Assembler 1 program in ascending sequence and 
writes them on another tape, five records per block. Figure 26-1 defines 
the sample problem file requirements. Figure 26-2 illustrates the card 
deck retrieved from the source statement library. 
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r 


i 


T- 

| j Tape Drive Number 


| Disk J-- t-t-^ 

jExtent #lj 1 | 2 | 3 | 

f-4-4-4-1 

|SYSRES |SYS 004 (SYSOOl |SYS002 | 
| j |SYS003 |SYS005 | 

L-X_X-X-J 

Not e; 


• Tape drive number refers to x'cuu* operand in the ASSGN card. 

• If a 7-track drive is used, the third operand (X'B8*) is required tc 
turn byte convert off. 

Figure 26-1. TAPE SORT/MERGE--Sample Problem, File Requirements 


r-T-T-T-1 

| | | (Generates | 

j Cards (Card Cels.(Card Cols.J Input | 

I Retrieved j 73-76 | 77-80 j fer | 

(■-4—-(■-4--j 

ICATALS Z.SM1 | | jTape-to-Printer | 

j BKEND Z.SM1 | | ( Utility | 

js/M Control Cards | $400 J0001-0006 (Z.UTTPPRl j 

j (6 cards) 111 I 

|BKEND III I 

l_X_X_ J _J 

Figure 26-2. TAPE SORT/MERGE—Sample Problem Card Deck 

To execute the Tape Sort/Merge sample problem, the following job control 
cards are needed: 

// JOB SORT 

// PAUSE ASSGN SYS002 TO SAME TAPE DRIVE AS IN PREVIOUS JOB 
// ASSGN SYS002,X'cuu' 

// PAUSE ASSGN SYS001,SYS003,SYS004,SYS005 TO EIFF TAPES 
// ASSGN SYS001,X'cuu' 

// ASSGN SYS003, X'CUU' 

// ASSGN SYS004,X'cuu' 

// ASSGN SYS005,X'cuu' 

// EXEC TSRT 

S/M Control Cards (6 cards) 

/* 

/& 


SYSLOG_Output 
// JOB SORT 

// PAUSE ASSIGN SYS002 TO SAME TAPE DRIVE AS IN PREVIOUS JOB 
// PAUSE ASSGN SYS001,SYS003,SYS004,SYS005 TO EIFF TAPES 
EOJ SORT 

S YSLST Outp ut S ummar y: 

• Job control cards 

• Sort control cards 

• Sort parameters 

• Computed constants 
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Module 27: OLTEP--370N-DN-481 


Modular Outline 

Partition Size.318 

Cere Iirage Library.318 

Phases . 318 

B-Transients.318 

Configuration Data Set.318 

On-Line Tests (CLTs).318 

Generating the OLT/CDS Library . . . .318 

Relocatable Library.319 

Modules.319 

Linkage Edit Statements.319 

Delete Statements.319 
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P ARTI TI ON S IZE 
14,336 bytes 

18,432 bytes with RETAIN active 


CORE_IMAGE_LIBRARY 


r-1 

| Blocks I 

r-f-T-T- \ 

| Phases | 2311 |2314/| | 

| | j 2319 |3330| 

r-i--I-i-i--1 

j OLTEP | 54 | 63 | 64 | 67 | 

f--1-1-j.-1-f 

| E-TransientsJ 4 | 4 | 4 J 4 | 

l _r_r_r_r_ j 


Phases 


IJZAD071 
IJZAC076 
IJZAD077 

IJZAD085 
IJZAD098 
IJZAD099 
IJZADOAA 
IJZADOAE 
IJZADOAC 

IJZACOAJ 
IJZADOLT 
IJZACPRT 
IJZAEXIO 

IJZAHEAD 
IJZAOPUT 
IJZARATA 
IJZARSIT 
IJZAfoAIT 


IJZACEOM 
IJZACKTP 
IJZACMNT 
IJZACOMP 
IJZACONV 

IJZADOOO 
IJZAD002 
IJZADO03 
IJZADO07 
IJZADOlO 


E-Transients 


$$BOLTEP 
$$BSCPEN 
$$ EZTIME 
$$BTCLT'P 


Ncte: 


The B-Transients are cataloged into 
the core image library along with 
the OLTEP component. 


IJZADOll 
IJZAD016 
IJZAD021 
IJZAD022 
IJZAD024 

IJZADO26 
IJZADO28 
IJZADO 31 
IJZAD032 
IJZADO33 

IJZADO 35 
IJZAD036 
IJZAD037 
IJZAD039 
IJZAD040 

IJZAD041 
IJZADO 42 
IJZAD043 
IJZAD044 
IJZAD045 


CONFIGUR ATI ON DATA SET 

A Configuration Data Set (CDS) is required 
in the core image library for each device 
cn the system and one for the CPU. This is 
the formula for calculating the block 
requirements: 

number of number of core image 

devices cn system + 1 = library blocks 
6 


C N-LINE TESTS (OLT S) 

The number of core image library blocks 
required for the On-Line Tests (OLTs) is 
dependent cn the number of devices types on 
the system, and the number and size of the 
OITs needed to test these devices. This 
infcrmaticn can be found in the writeup 
that accompanies the CITs. 


IJZADO47 
IJZADO52 
IJZAD056 
IJZADO57 
IJZAD062 


IJZADO64 
IJZAD070 


GENERATING THE OLT/CDS LIBRARY 


The Program Information Department (PID) 
supplies the on-line tests and 
configuration data sets cn tape or on disk 
if there are no tape devices on the system. 
This tape is generated by PIE from 
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information supplied by the customer 
engineer. 


IJZAE039 

IJZADO40 


The OLTs and CDSs must be link-edited 
into the core image library before OLTEP 
can execute. To do this, use the Editor 
function of the Stand Alone Service Program 
(SOSP), which is included on the tape. 

Also use this program to add new tests as 
they are made available and to generate 
additional CESs when you add devices to the 
system. 


IJZAE041 
IJZAD042 
IJZAE043 

IJZAD044 
IJZAD045 
IJZAD047 
IJZAE052 
IJZAD056 


IJZAD057 
IJZAD062 

RELOCA.TABLE^LIBRARY IJZAE064 

— .. IJZAEO70 

r - T - n IJZAD071 

j Modules|Blocks| 


1---f--| IJZAD076 

| 59 | 463 j IJZAD077 

L -±-J IJZAD078 

IJZAEOAA 
IJZADOAB 


Modules 


IJZABOOK 
IJZACEOM 
IJZACKTP 
IJZACMNT 
IJZACOMP 

IJZACONV 
IJZADOOO 
IJZADOO 2 
IJZADO03 

IJZADO07 
IJZADOIO 
IJZAD011 
IJZAD016 
IJZAD021 

IJZAD022 
IJZAD024 
IJZAD026 
IJZAD028 
IJZAD031 


IJZACOAC 
IJZAEOAJ 
IJZADOLT 
IJZADPRT 
IJZAEXIC 

IJZAHEAD 
IJZAOLTP 
IJZACPEN 
IJZAOPUT 
IJZARATA 

IJZARSLT 
IJZATIME 
IJZATOLT 
IJZAWAIT 


L in k age E di t St at ements 


INCLUDE IJZABOOK 
// EXEC IKKEDT 


IJZAD032 
IJZAD033 
IJZAD035 
IJZAD036 
IJZAD037 


Delete Statements 


EELETR IJZ.ALL 


Module 27: CLTEE— 370N-DN-481 319 











28 


Module 28: BTAM - 370N-CQ-469 


Modular Outline 


Core Image library.323 

ETAM On-Line Terminal Test Pattern 

Phase Identification.323 

ETAM Transients.324 

Relocatable Library.324 

Modules.325 

Concurrent OLTEP.325 

Channel Program.325 

WTTA Subroutine.325 

Iccal 3270 Table of Offsets . . . .325 

Channel Program Modules for BSC . .326 

BSC Tables of Special Characters . .326 

Translation Tables.326 

Delete Statements.327 


Modular Index 


BSC table of special characters 326 
BTMOD (BTAM logic modules), size of 332 

channel program modules (for 
start-stop) 325 

channel program modules for BSC 326 
concurrent OLTEP 325 
core image library 323 

core image library 323 

DACA (display alphameric control 
area) 332 

data event control block 332 
delete statements 327 
DFTRMLST (define the terminal list 
BTAM) 330 

DFTRMLST (table requirements, BTAM) 
AUTOLST/AUTOWLST 331 
DIALST 331 
IDLST 331 
OPENLST 330 
SSLAST/SSAWLST 331 


WRAPLST 330 

WTTALST 332 

DTFBT (define the file BTAM), size of 
table 329 

DTFBT table requirements formula 330 

DTFBTND (define the file end BTAM), size 
of table 330 

IOCS module sizes 
BSC 326 
start-stop 325 
translate tables 326 

library book (macro) names 328 

library book (macro), number of 328 

macros, IBM-supplied 
AS 328 
ASCTR 328 
ASLIST 328 
ASMTRTAB 328 
BTMOD 328 
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BTRD 328 
BTRWC 328 
BTWAIT 328 
CHGNTRY 328 
CONFIGUR 328 
CONTROL 328 
CTRGROUP 328 
CTRLIST 328 
CTRSCHED 328 
DEULIST 328 
DISPGUILD 328 
DFTRMLST 328, 330 
DTFBT 328, 329 
DTFBTND 328, 330 
GDUAS 328 
GDULIST 328 
GDUTRANS 328 
IJLBTMDS 328 
LERB 328 
LERPRT 328 
LOPEN 328 
ONLTST 328 
PARAMNUM 328 
PARMLIST 328 
RELBUF 328 
RESETPL 328 
RMSRTAB 328 
SCANREQ 328 
STEND 328 
TGROUP 328 
TPEDIT 328 
TRLIST 328 
TRANSLAT 328 
TRNSLATE 328 
TRSRCTW 328 
TRSRCT3 328 
TRSSCTW 328 
TRSSCT3 328 
TWAIT 328 

module names 325 

modules, number of 324 

on-line terminal test pattern phase 
identification 323 


on-line terminal test patterns 
phases 323 
transients 323, 324 

phase names 323 
phases, number of 323 

relocatable library 324 
relocatable library blocks 324 

source statement library blocks 328 
source statement library macros 328 

transient routines 324 
transients, IBM-supplied 324 
$$ABERP1 324 
$$ABERP2 324 
$$ABERP3 324 
$$ABERP4 324 
$$ABERP5 324 
$ $ABERP6 324 

$ $ABERP7 324 

$$ABERP8 324 
$ $ABERP9 324 
$$BCTC01 324 
$$BETPRT 324 
$ $BHDRCK 324 

$$BLEPRT 324 
$ $BLOPEN 324 

$ $BOTC01 324 

$$BOTC02 324 
$$BRESPL 324 
$$BTCNCL 324 
$$BTMEBG 324 
$ $BT1030 324 

$$BP1Q50 324 

$$BT1060 324 

$ $BT2260 324 

$$BT2740 324 

$$BT2 848 324 

$$BBT3SC 324 
$$BBT3SCI 324 

translation tables 326 

WTTA subroutine 325 
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CORE IMAGE LIBRARY 


Elccks 


f 


Phases j 2311 


2314/ 

2319 


3330 


BTAM On-Line 
Terminal Test 
Patterns 
Transients 

BTAM Transient 
Routines (other 
than test 
patterns) 


52 | 52 


7 

19 


I 7 

I 

j 19 


52 

7 

19 


52 

7 

19 


BTAM On-Line Terminal Test Patter n Phase Identificatio n 


Phase Names 


Test Patterns for On -L in e Termi n al Test s 


IJLBOT02 
IJLBOT03 
IJLBOT04 
IJLBOT05 
IJLBOT06 


Transparent EECDIC Message 
(JSASCII Transparency Message 
Normal EECDIC Message 
Normal (JSASCII Message 
Alphameric USASCII Message 


IJLBOT07 
IJLBOT08 
IJLBOT09 
IJLBOTIO 
IJLBOTll 


USASCII Printer Message 
USASCII Punch Message 
TRANSCODE Printer Message 
TRANSCODE Punch Message 
TRANSCODE Multipoint Message 


IJLBOT12 
IJLBOT13 
IJLBOT14 
IJLBOT15 
IJLBOT16 


EBCDIC Printer Message 
EBCDIC Punch Message 
EBCDIC Alphameric Message 

EBCDIC Weak Pattern Message fcr Switched Line 
EBCDIC Weak Pattern Message for Leased Line 


IJLBOT17 
IJLBOT18 
IJLBOT19 
IJLBOT 20 
IJLBOT21 
IJLBOT22 
IJLBOT23 
IJLBOT24 
IJLBOT25 
IJLBOT26 
IJLBOT27 
IJLBOT28 
IJLBOT29 
IJLBOT30 
IJLBOT31 
IJLBOT32 
IJLBOT33 
IJLBOT34 
IJLT2ALC 
IJLT2ROT 


TRANSCODE Weak Pattern Message for Switched Line 

TRANSCODE Weak Fattern Message fcr Leased Line 

EBCDIC Weak Pattern for OLE SYN Insertion 

EBCDIC 80-Character Transparent Message 

EBCDIC 120-Character Transparent Message 

EBCDIC 144-Character Transparent Message 

3270 Basic EECDIC Test Pattern 

3270 Model 1 Align EBCDIC Test Pattern 

3270 Model 2 Align EECDIC Test Pattern 

3270 Orders EBCDIC Test Pattern 

3270 Universal Character Set Test Pattern 

3270 NL/EOM Printer EBCDIC Test Pattern 

3270 Basic ASCII Test Pattern 

3270 Model 1 Align ASCII Test Pattern 

3270 Model 2 Align ASCII Test Pattern 

3270 Orders ASCII Test Pattern 

3270 Universal Character Set Test Pattern 

3270 NL/EOM Printer ASCII Test Pattern 

All Character Test for IEM 2848 

Rotate Test for IBM 2848 


IJLT2TLT Tilt Test for IBM 2848 

IJLT2TWS Twist Test for IEM 2848 

IJLT3ALC All Character Test for IBM 1030 
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IJLT3R0T Rotate Test for IBM 1030 

IJLT3SLA Analyzer Test for IBM 1030 (SELECTRIC^) 


IJLT3TLT 

IJLT3TWS 

IJLT5ALC 

IJLT5ROT 

IJLT5SLA 


Tilt Test for IBM 1030 

Twist Test for IBM 1030 

All Character Test fcr IBM 1050 or 2740 

Rotate Test fcr IBM 1050 cr 2740 

SELECTRIC Analyzer Test for IBM 1050 or 2740 


IJLT5TLT 

IJLT5TWS 

IJLT6ALC 

IJLT6ROT 


Tilt Test for IBM 1050 or 2740 
Twist Test for IEM 1050 or 2740 
All Character Test fcr IBM 1060 
Rotate Test for IBM 1060 


IJLT6SLA SELECTRIC Analyzer Test for IBM 1060 

IJLT6TLT Tilt Test for IBM 1060 

IJLT6TWS Twist Test for IBM 1060 


BTAM Transients 


$$ABERP1 

$$ABERP2 

$$ABERP3 

$$ABERP4 

$$ABERP5 

$$ABERP6 

$$ABERP7 

$$AEERP8 

$$ABERP9 

$$ECTC01 

$$BETPRT 

$$EHDRCK 

$$BLEPRT 

$$ELOPEN 


Control handler for ETAM special message 

writer and error statistics reccrder 

BSC online test message writer 

Console special message writer 

Remote 3270 status/sense error recorder 

Error recovery message writer, phase 1 

Error recovery message writer, phase 2 

Error recovery message writer, phase 3 

RMSR record builder 

Free areas from real storage 

CLOSE routine 

Error threshold message 

Terminal test request validation and comparison 
Line error print routine 
OPEN routine 


$$BOTC01 

$$BRESPL 

$$EOTC02 

$$BTCNCL 

$$BTMEBG 

$$BT1030 


OPEN routine 

Reset Polling Lines 

OPEN for local devices routine 

Cancel routine 

Terminal test request - IBM 1030 Manual Entry and Eadge Reader 
Terminal test module - IBM 1030 


$$BT1050 

$$BT1060 

$$BT2260 

$$BT2740 

$$BT2848 

$$BBT3SC 

$$BBT3SCI 


Terminal test module - IEM 1050 
Terminal test module - IBM 1060 
Terminal test module - IBM 2260 
Terminal test module - IBM 2740 
Terminal test module - IBM 2848 
OLTEP device assignment completion 
OLTEP device assignment initiation 


RELOCATABLE LIBRARY 


r- t- 1 

| Modules|Blocks| 

^- + - 1 

| 65 | 161 | 

i_x_j 
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Modules 


Bytes 

Module Of Main 

Name Description Storage 


CONCURRENT OLTEP 

BT3270SC Concurrent OLTEP Set-up 2500 


CHANNEL PROGRAM 

(For start-stop, the modules include a table of special characters.) 


IJLOEZ 

WTTA 

124 

IJL00Y 

IBM 7770 

76 

IJL01J 

IBM 1030 (Auto Poll) 

187 

IJL01Z 

IBM 1030 

139 

IJL02J 

IBM 1060 (Auto Poll) 

175 

IJL02Z 

IBM 1060 

127 

IJL03Z 

IBM 2848 Remote 

209 

IJL04Z 

ATST 83B3 

78 

IJL05Z 

Western Union 115A 

72 

IJL06Z 

Table Generation for 2260 Lccal 
Channel Program 

16 

IJL07J 

IBM 1050 Nonswitched (Auto Poll) 

132 

IJL07Y 

IEM 1050 Switched 

202 

IJL07Z 

IBM 1050 Nonswitched 

124 

IJL08H 

IBM 2740 with Station Control 
(Auto Poll) 

97 

IJL08M 

IBM 2740 with Dial, Transmit 
Control, and Checking 

176 

IJL08P 

IBM 2740 with Station Ccntrcl 
and Checking 

132 

IJL08Q 

IBM 2740 with Dial and Checking 

172 

IJL08R 

IBM 2740 with Checking 

141 

IJL08U 

IBM 2740 with Dial and Transmit 
Control 

122 

IJL08X 

IBM 2740 with Station Control 

92 

IJL08Y 

IBM 2740 with Dial 

114 

IJL08Z 

IBM 2740 Basic 

93 

IJL081 

IBM 2740 and OIU with 

Dial and Checking 

246 

IJL082 

IEM 2740 and OIU with 

Checking 

181 

IJL089 

IBM 2740 with Station 

Control and Checking 
(Auto Poll) 

145 

IJL09Y 

TWX 33 

110 

IJL10Y 

IBM 7772 

76 


W TTA SUBROUTINE 

IJLWTZ WTTA Subroutines 1223 

LOCA L 3270 TABLE OF OFFSETS 

IJLOHZ 3277L table of offsets with 30 

command codes 
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CHANNEL PROGRAM MODULES FOR ESC 


The following relocatable modules are BSC channel program modules for 
switched lines using ID verification (CPU-tc-CFU). The correspondence 
between relocatable module name and the codes that appear in the FEATURE 
operand sublist in the DTFBT macro instruction is indicated. 


IJLOBY 

For switched lines 

415 

IJLOBZ 

For nonswitched lines 

281 

IJLODY 

IBM 2780 switched point to 
pcint 

212 

IJLODZ 

IBM 2780 nonswitched pcint to 
point 

148 

IJL1BZ 

ESC Multipoint Lines 

253 

IJL2DZ 

IBM 2780 Multipoint for 

136 


TRANSCODE 


IJLEDIT3 

Logic, TP EDIT Macro 

2090 

BSC TABLES 

OF SPECIAL CHARACTERS 


IJLASC 

In ASCII for BSC 

85 

IJLEBD 

In EECDIC for BSC 

85 

IJLTCD 

In 6-bit transcode for ESC 

69 

TRANSLATION TABLES 


IJLRASA 

For USASCII to EECDIC for BCS 

256 

IJLRCTW 

For ITA2 to EBCDIC (World Trade 

256 


Teletype) 


IJLRCT1 

From BAUDOT to EECDIC 

256 

IJLRCT2 

From TWX TO EBCDIC 

256 

IJLRCT3 

From ZSC3 to EBCDIC (World 

256 


Trade Teletype) 


IJLRC30 

From 1080 to EBCDIC 

256 

IJLRC40 

From 2740 to EBCDIC 

256 


(lowercase) 


IJLRC50 

From 1050 to EBCDIC 

256 


(lowercase) 


IJLRC60 

From 1060 to EBCDIC 

256 

IJLRC80 

From 6-Bit 

256 


TRANSCODE to EECDIC 


IJLRF40 

From 2740 to 

256 


EBCDIC (uppercase) 


IJLRF50 

From 1050 

256 


to EECDIC (uppercase) 


IJLRSCI 

From USASCII 

256 


to EECDIC with 2848 

Attached to 2701 via IBM 

Terminal Control Type III 


IJLSASA 

From EBCDIC to 

256 


USASCII for BSC 


IJLSCTW 

From EBCDIC 

256 


to ITA2 (World Trade Teletype) 


IJLSCT1 

From EBCDIC to BAUDOT 

256 

IJLSCT2 

From EBCDIC to TWX 

256 

IJLSCT3 

From EBCDIC to 

256 


ZSC3 (World Trade Teletype) 


IJLSD30 

From EBCDIC to 1030 

256 
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IJLSD40 

From EBCDIC to 2740 

256 

IJLSD50 

From EBCDIC to 1050 

256 

IJLSD60 

From EBCDIC to 1060 

256 

IJLSD80 

From EBCDIC to 

6-bit TRANSCODE 

256 

IJLSSCI 

From EBCDIC to 

USASCII with 2848 Attached 
to 2701 via IBM Terminal 
Control Type III 

256 


Delete Statements 


To delete the BTAM phases from the core image library, the BTAM 
modules from the relocatable library, and the BTAM becks frem the source 
statement library, you must supply the DELET card for the appropriate 
library and the name of the phase, module, cr beck tc be deleted. For 
example: 

// JOB DELETC 
// EXEC MAINT 

DELETC $$ECT01,$$BETPRT,etc. 

DELETC IJLT2ALC,IJLT2ROT,etc. 

DELETR IJLOOY,IJL01Z,IJL02Z,etc. 

DELETS A.CONTROL,A.LERB,etc. 

/6 


To delete both BTAM and QTAM frem the cere image, relccatable and 
source statement libraries, the DELET card for the appropriate library 
and the following entries must be made: For the core image transients, 
you must supply the DELETC card with a separate entry fer each transient 
(QTAM and BTAM) to be deleted. For the core image phase names, enter 
the delete card as follows: 

DELETC $$BCTCQ1,$$B00003,$$BETFRT,etc. 

DELETC IJLB.ALL 
DELETC IJLT.ALL 

To delete both BTAM and QTAM from the relocatable library enter the 
delete card as follows: 

DELETR IJL.ALL 

To delete the BTAM and QTAM books from the source statement library, 
enter the DELETS card with a separate entry fer each beck tc be deleted. 
The following example shows the required delete cards and type of 
entries to be made in those cards: 

// JOB DELETE 
// EXEC MAINT 

DELETS A.CONTROL,A.CANCELM,etc. 

/6 
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SOURCE STATEMENT LIBRARY 


r- t-1 

|Macro|Blocks j 

i"-+-i 

| 46 | 7452 j 

L_ ± _J 


Macros 


Main Storage Bytes 

Basic 


Fcr 


A. AS 

A.ASCTR 

A.ASLIST 


A.ASMTRTAB 

256n (Note 

1) 

A.ETBONLT 

(inner 

iracrc 

in 

ETMOD) 

A.BTBTEIH 

(inner 

macro 

in 

ETMCD) 

A.ETBTROD 

(inner 

iracrc 

in 

BTMOD) 

A.BTCKID 

(inner 

macro 

in 

ETMCD) 

A.ETCSE 

(inner 

macro 

in 

ETMOD) 

A.BTCTUPT 
A.ETMOD 

(inner 

macro 

in 

ETMCD) 

A.BTNCKID 

(inner 

macro 

in 

BTMOD) 

A.BTOLTIH 

(inner 

macro 

in 

ETMCD) 

A.ETONLAP 

(inner 

macro 

in 

ETMOD) 

A.BTONLOA 

A.BTRD 

(inner 

macro 

in 

ETMCD) 

A.BTRLBF 

(inner 

macro 

in 

ETMOD) 

A.BTRQBF 

(inner 

macro 

in 

ETMCD) 

A.ETTRANS 

(inner 

macro 

in 

ETMOD) 


A.BTRWC 
A.ETWAIT 

A.CHGNTRY 20 (Start-stop) 

72 (BCS) 

20 (Start-step Autc Poll) 
22 (2260 Local) 


A.CONFIGUR 

A.CONTROL 20 

A.CTRGROUP 
A.CTRL1ST 
A.CTRSCHED 


+ 6 

+72 
+ 4 

♦ 38 


A.DEULIST 

A.DISPGUID 

A.DFTRMLST 
A.DTFBT 

A.DTFBTND 

A.GDUAS 
A.GDULIST 

A.GDUTRANS 

A.IJLBTMDS 



A.LERB 

20 


A.LERPRT 

14 

♦ 8 

A.LOPEN 

A.ONLTST 

A.PARAMNUM 

A.PARML1ST 

8 

♦ 2 

A.RELBUF 

14 

+ 4 

A.REQBUF 

12 

+ 8 

A.RESETPL 

A.RMSRTAB 
A.SCANREQ 

A.SDRTAB 

12 

+ 4 


Variatles 


(Ncte 2) 

(Ncte 2) 
(Note 2) 

(Note 2) 


(Note 2) 
(Ncte 2) 

(Ncte 3) 

(Note 4) 
(Ncte 2) 
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A.STEND 


A.TGROUP 


A.TPEDIT 


A.TRLIST 


A.TRANSLAT 


A.TRNSLATE 

26 

A.TRSRCTW 

256 

A.TRSRCT3 

256 

A.TRSSCTW 

256 

A.TRSSCT3 

256 

A.TWAIT 

24 


+16 (Note 2) 


+20 (Note 4) 


Notes ; 


1. n=nurnber of different operands coded. 


2. No operands coded in register notation. 


3. First operand not coded in register notation. 


4. All possible operands net ceded in register notation. 


DTFET (DEFINE THE FILE: BTAM) 


TABLE REQUIRE MENTS 

Size = 64 + N (40 ♦ 8x) + BUFCB + BUFNO (BUFL + f) + y + z 
(+ 32N for BSC only) 


Where: 

N 

x 

♦BUFCB 

♦BUFNO 

♦BUFL 

f 

y 

Z 


number of lines in the line greup (or, for a local 2260 and 
local 3270**, the number of devices attached to the control 
unit) 

number of CCWs in the largest channel program available fer 

the device, given in Figure 28-1 

8 if a buffer pool is used 

0 if a buffer is not used 

number of buffers in the pcol 

length of each buffer 

number of bytes required tc extend each buffer to a multiple 
of 8 

size of the model channel program table fer the line group, 
given in Figure 28-1. If two or more DTFBTs use the same 
model channel program and are linkage edited together, 
include the value only once. 

Size of the table of special characters given in Figure 
28-1. For BSC only, if two or more DTFBTs use the same 
transmission code, include the value cnly cnce. 


* If the buffer pool is shared by two cr mere ETFETs, include the value 
only once. 

♦♦For a local 3270, at least one DTFBT is required fer each control 
unit. 
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Device 

-T~ 

i 

_ 1 


m 

1030 

1 — 
1 


1 

1050NS 

1 


2 

1050S 

1 


2 

1060 

1 


2 

2260L 

1 

Not 

applicable 

2260R 

1 


2 

2740 

1 

Not 

applicable 

2740C 

1 

Not 

applicable 

2740D 

1 

Not 

applicable 

2740DC 

1 

Not 

applicable 

2740DT 

1 

Not 

applicable 

2740DTC 

1 

Not 

applicable 

2740S 

1 


1 

2740SC 

i 


1 

2740DCQ 

1 

Not 

applicable 

2740C0 

1 

Not 

applicable 

3277R 

1 


5 

115 A 

1 


2 

83B3 

1 


2 

1130 

j 


2 

2780 

1 


3 

WTTA 

1 

Not 

applicable 


_l._ 




Figure 28-2. BTAM—Number of Polling/Addressing Characters 


Table Requirements for DIALST 
Size = n(m +1) +l+q+p+i 


where: 

n = 
m = 

q Z 

P = 
i = 


number of list entries 

values specified in Figure 28-2 

2 if the list includes entries for polling or addressing 
0 otherwise 

number of dial digits 

3 if the inlist operand is coded (ESC cnly) 

0 ptherwise 


Table Requirements for IDLST 

Size of TWX calling list = d + 5 + 2b 

Size of TWX answering list = 5 + b 

Size of BSC IDLST only =3+d+2r+s+i 

where: 

d = number of dial digits 
b = number of TWX ID characters 
= 0 otherwise 

r = number of ID characters expected tc be received (BSC) 
s = number of ID characters to be sent (BSC) 
i = 3 if the inlist operand is coded (ESC) 

= 0 otherwise 

Table Requirements for SSLAST/SSAWLS T 
Size =n(m +1) +6 

where: n = number of list entries 

m = values specified in Figure 28-2 

Table Requirements for AUTOLST/AUTOWL ST 
Size = n(tn + 2) + 8 

where: n = number of list entries 

m = values specified in Figure 28-2 
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Table Requirements for WTTALST 

1. When the WRU feature is present in DTFET: 

Size = 3 + 2r + s 

2. When the IAM feature is present, and WRD is not present in DTFBT: 
Size = 2 + s 

where: r = number of ID characters expected to be received 

s = number of ID characters to be sent 


BTMOD (BTAM Logic Module) 


The size of the BTAM module varies with the options selected as shown in 
Figure 28-3. When all operands are omitted cr the standard (default) 
options are coded, the resulting basic module requires 5515 bytes of 
main storage. 

BTAM DATA EVENT CONTROL B L OCK TABLE REQUIREMENTS 
Size = 40 bytes 

When the MF operand of a READ or WRITE macro is coded MF=L, or when 
the MF operand is omitted, a Data Event Control Block (DECB) is 
reserved. One DECB should be reserved per line. 

SCANREO DISPLAY ALPHAMERIC CCNTRCL AREA ( D ACA) REQUIREMENTS 

Size of each DACA = 24 bytes 

When the MF operand of a SCANREC macro is coded MF=L, or when the MF 
operand is omitted, a Display Alphameric Control Area (DACA) is 
reserved. One DACA should be reserved per device. 
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r - T - T - 

| Operand | Option | Number of bytes added tc basic ircdule 

f-+- 


| ERLOGIC= 

I 

I * I 

1--+ 

! SWITCH^ ! 


I 

T 

i 

i- 

i 

i- 

i i 

i i 

i i 

| BUFFER= I- 


N 

- 

| -2090 
j _ 



C 

1 +400 

j _ . 



NC 

j -1800 

l 



YES 

| +1700 

(IF 

BUFFER=NO, BSCTEST=NO) 


! +1750 

(IF 

BUFFER=YES, BSCTEST=NO) 


i 

J +1800 

(IF 

BUFFER=YES, BSCTEST=YES 

NEWID 

T 

! +2900 

(IF 

BUFFER=NO, BSCTEST=NO 


| +2950 

(IF 

BUFFER=YES, BSCTEST=NO) 


i 

j +3000 

(IF 

BUFFER=YES, BSCTEST=YES) 


| TERMTST= 
|-- 

I 

I 

| L2260= 

I 

I L3277= 


YES | +1950 (If L2260=NO and L3277=NO) 

l-- 

| +2075 (IF L2260=YES OR L3277=YES) 

-+- 

REQREL | + 710 (If L2260=NO and L3277=NO) 

I-- 

| + 825 (If L2260=YES or L3277=YES) 

--j-- 

YES | +1044 

-4--- 

| - 980 (If ERL0GIC=N) 


YES 

NO 



T “ 
j = YES 

j. 

“T” ‘ 

i ♦ 

i 

290 

AUDIO= 

| YES 
- 

T 

1 + 
- 

410 (SWITCH must equal YES) 


♦1440 

(If 

ERLOGIC=E) 


+ 1750 

(If 

ERLOGIC=C) 


- 730 

(If 

ERIOGIC=NC) 



♦When estimating the size of BTAM nodules, use the ERLOGIC storage 
estimate only if L2260 and/or L3270 and/or SSAPL are not specified. 

Figure 28-3. ETAM—Main Storage Requirements (Part 1 of 2) 
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Module 29: QTAM ~ 370N-CQ-470 


Modular Outline 


Core Image Library.337 

Transients ..337 

Relocatable Library.337 

Modules.337 

Basic QTAM Logic Modules.337 

QTAM Device I/O Modules ..... .337 

Delete Statements.343 

Source Statement Library.34 5 

Macros.345 

Basic.345 

System Generation.345 


basic logic modules and storage 
requirements 337 
basic QTAM logic modules 337 
buffer requirements, audio 
applications 348 
buffer requirements, nonaudio 
applications 348 

control information storage 
requirements 347 
core image library 337 

core image library blocks (transients) 337 

delete statements 343 

device I/O modules requirements 337 

DTFQT 

(define the file QTAM), size of 
tables 346 

audio output queue table requirements 
(QTAM) 347 

checkpoint records table 
requirements 346 
comm, line group file table 
requirements 346 
IBM 7772 voc. file table 
requirements 347 
main storage destination queue, 
table req. 346 

main storage process queue table 
requirement 346 


QTAM Storage Requirements.34 6 

DTFQT (Define the File: QTAM) . . .346 

DASD Message Queues Files.346 

Communication Line Group File . . .346 

Main Storage Process Queue.346 

Main Storage Destination Queue . . .346 

Checkpoint Records File.346 

IBM 7772 Vocabulary File.347 

Audio Output Queue ..347 

Control Information.347 

Buffers.348 

QTAM Macro Instructions.348 


Modular Index 

message queues file table req. 

QTAM 346 

library book (macro) names 345 
library book (macro) number of 345 


macros, IBM-supplied 


ARUMGTYP 

345 

BREAKOFF 

345 

BUFARU 

345 

BUFFER 

345 

CANCELM 

345 

CHECKARU 

345 

CHNGP 

345 

CHNGT 

345 

CKREQ 

345 

CLOSEMC 

345 

COPYC 

345 

COPYP 

345 

COPYQ 

345 

COPYT 

345 

COUNTER 

345 

CTLTBL 

345 

DATESTMP 

345 

DIRECT 

345 

DTFQT 

345 

ENDRCV 

345 

ENDREADY 

345 

ENDSEND 

345 

EOA 345 
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EOB 345 

SKIP 345 

EOBLC 

345 

SNDITA2 

345 

ERRMSG 

345 

SNDZSC3 

345 

IJLQBABD 

345 

SOURCE 

345 

IJLQBFRD 

345 

STARTARU 

345 

IJLQBRBD 

345 

STARTLN 

345 

IJLQCKPD 

345 

TERM 345 

IJLQCTLD 

345 

TERMTBL 

345 

IJLQDEQU 

345 

TERMTBLD 

345 

IJLQDSCT 

345 

TIMESTMP 

345 

IJLQDTFD 

345 

TRANS 345 

IJLQIPlD 

345 

WORD 345 

IJLQLABD 

345 

WORDTBL 

345 

IJLQLCBD 

345 

WRU 345 


IJLQMCBD 

345 

macro instructions storage 

IJLQOBRD 

345 

requirements 348 

IJLQQCBD 

345 

module names 

338-343 

IJLQSTBD 

345 

modules, number of 337 

IJLQSVCD 

345 



IJLQTBLD 

345 

relocatable 

library 337 

IJLQTSVC 

345 

relocatable 

library blocks 337 

IJLQVECD 

345 



INTERCPT 

345 

source statement library blocks 345 

LCBD 345 

source statement library macros 

LINE 345 

QTAM 345 

LINETBL 

345 

supervisor generation 345 

LIST 345 



LOGSEQ 

345 

transient routines 337 

LPSTART 

345 

transients, 

IBM-supplied 

MODE 345 

$ $BCQC01 

337 

MSGTYPE 

345 

$$BCQC02 

337 

OPCTL 345 

$$BCQC03 

337 

OPTION 

345 

$$BCQ001 

337 

pause ; 

345 

$$BCQ002 

337 

POLL 345 

$$BCQ003 

337 

POLLIMIT 

345 

$$BCQ004 

337 

POSTARU 

345 

$$BCQ005 

337 

POSTRCV 

345 

$$BCQ006 

337 

POSTSEND 

345 

$$BCQ007 

337 

PREFIXD 

345 

$$BCQ008 

337 

PROCESS 

345 

$$BQCNCL 

337 

QCBD 345 

$$BQCNCM 

337 

RCVHDR 

345 

$$BQHDCK 

337 

RCVITA2 

345 

$$BQWTRA 

337 

RCVSEQ 

345 

$$BOWTRl 

337 

RCVZSC3 

345 

$ $BQWTR2 

337 

RELEASEM 

345 

$ $BQWTR3 

337 

REPEAT 

345 

$$BQ1030 

337 

REROUTE 

345 

* $$BQ1050 

337 

RETRIEVE 

345 

$$BQ1060 

337 

ROUTE 345 

$$BQ2260 

337 

SENDHDR 

345 

$$BQ2740 

337 

SENDSEQ 

345 



SEQIN 345 

values for communication line group 

SEQOUT 

345 

table 346 
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CORE IMAGE LIBRARY 


r - n 

| Blocks | 

f-T-T-T-i 

I Transients|2311|2314/j 33301 
I I 12319 | | 

h-+- i - \ -{ 

| 22 | 22 | 22 | 22 | 

L_JL_J_X-J 


Transients 


$$BCQC 01 
$$ECQC02 
$$BCQC 03 
$$EOQO01 
$$BOQO02 
$$EOQO03 


Close Phase 1 
Close Phase 2 
Close Phase 3 

Open Monitor/EASD Message Queues, Phase 1 

Open Line Group and Main Storage Prccess/Destinaticn Queues 
Open Checkpoint/Restart, Phase 1 


$$BOQO04 

$$BOQO06 

$$EOQO07 

$$BOQQ08 

$$BQCNCL 

$$BQCNCM 


Open Checkpoint/Restart, Phase 2 

Open Main Storage Process/Bestination Queues 

Open IBM 7772 Vocabulary DASD File 

Open Audio Line Group and Output Queue 

Cancel 

Cancel 


$$EQHDCK 

$$BQWTRA 

$$BQWTR1 

$$EQtfTR2 

$$BQWTR3 


Terminal Test Header Analysis 
ARU Message Writer 
Message Writer, Phase 1 
Message Writer, Phase 2 
Message Writer, Phase 3 


$$EQ1030 

$$BQ1050 

$$EQ1060 

$$BQ2260 

$$BQ2740 


Terminal Test Module for IBM 1030 
Terminal Test Module for IBM 1050 
Terminal Test Module for IBM 1060 
Terminal Test Module for IBM 2260 
Terminal Test Module for IEM 2740 


RELOCATABLE LIERARY 


r- t-t 

j Modules|Blocks | 

h-i--j 

| 109 | 392 | 

L_X_J 


Modules 


BASIC QTA M LOGI C MODULE S: Basic QTAM Logic modules are identified by 

one asterisk (*) preceding the listed module. 

Q TAM DEVI CE I/C MODULES : QTAM device I/O modules are identified by twc 
asterisks (**) preceding the listed module. Include the storage 
requirements for a particular device I/O module only once, and only if 
the terminal type is present in the system. 
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Module 

Name 

Description 

Bytes 
of Main 
Storage 

IJLQAA 

Audio Line Appendage 

2386 

Note; 

Required if the QTAM 
audio support is 
selected- 


+IJLQAD 

IBM 7772 Vocabulary 

Disk Appendage 

1604 

Note: 

Required if the IBM 

7772 Vocabulary File 
is used. 


IJLQBO 

Breakoff (BREAKOFF) 

212 

♦IJIQCK 

Checkpoint 

1208 

Note; 

Required if the 
Checkpoint/Restart 

Facility is selected 
in the DTFQT. 


IJLQCL 

Change Line (STARTLN AND 
STOPLN) 

557 

IJLQCM 

Cancel Message (CNACELM) 

160 

IJLQCP 

Change Polling List 

Entry (CHNGP) 

146 

IJLQCR 

Checkpoint Request (CKREQ) 

98 

IJLQCr 

Change Terminal lafcle 

Entry (CHNGT) 

250 

♦IJLQDA 

Disk I/O Module 

1372 

Note; 

Not required when the system 
contains only audio devices- 


IJLQDC 

Copy Counters (CCFYC) 

280 

IJLQDE 

Ccpy Terminal Table 

Entry (COPYT) 

120 

IJLQDL 

Distribution List 

156 

IJLQDP 

Copy Polling List 

Entry (COPYP) 

104 

IJLQDQ 

Copy Queue Control 

Block Status (COPYQ) 

98 

IJLQDT 

Insert Date in Message 

Header (DATESTMP) 

60 

IJLQEA 

End-of-Address (EOA) 

100 

IJLQEB 

End-cf-Block (EOB) 

132 

IJLQEC 

End-of-Block and Line 
Correction (EOBLC) 

396 

IJLQER 

Error Message (ERRMSG) 

292 

IJLQEX 

Expand Message header 

70 

IJLQFL 

DTE Locator 

78 

IJLQGA 

Get Audio Message 

324 

IJLQGB 

Get Audio or Nonaudio 

Message 

732 
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Module 

Name 


Description 


Bytes 
of Main 
Storage 


IJLQGC Get audio message 760 

or nonaudio message 
record (GET) 

IJLQGD Get audio message 714 

or ncnaudio message 
segment (GET) 

IJLQGM Get complete message 472 

(GET) 

IJLQGR Get message record (GET) 500 

IJLQGS Get message segment (GET) 454 

♦IJLQIP QTAM implementation 3692 

IJLQIT Intercept message 140 

(INTERCPT, permanent 
queuing) 

*IJLyLA Line appendage and ERP module 4152 

PCI and program 
Note: Net required when the 

system contains only 
audio devices. 

*IJLQLC Line appendage for PCI and 630 

program check module 
Note: Net required when the system 

contains only audio devices. 

IJLgLG Audio input message 304 

logging (LOGSEG) 

IJLQLK Lockup terminal 104 

table entry (DIRECT) 

♦IJLgLC IEM 2260 local 1288 

appendage 

Note: Required if the IBM 

2260 local device is 
used. 

IJLQMC Conversational 384 

rrede (MODE) 

IJLQMI Initiate mode (MCDE) 18 

IJLQMM Message-mode inter- 44 

face (MODE) 

IJLQMP Priority mode (MODE) 36 

IJLCMT Compare Message Type 60 

(MSGTYPE) 

♦IJLoMW Error recovery prcce- 1359 

dures message writer 
subtask 

**IJLQM0 Model channel program 194 

for IBM 1030 terminals 

**IJLQM1 Model channel program 168 

for IBM 1060 terminals 

**IJLQM2 Mcdel channel program 206 

for IBM 2260 terminals 

**IJLQM3 Mcdel channel program 102 

for AT&T 83B3 terminals 

**IJLQM4 Mcdel channel program 91 

for Western Union Plan 
115A terminals 
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Module 

Name 


Description 


Bytes 
of Main 
Storage 


♦+IJLQM5 

Model channel program 
for IBM 1050 switched 
and nonswitched terminals 

207 

**IJLQM6 

Model channel program 
for IBM 1050 nonswitched 
terminals 

194 

* *1JLQM8 

Model channel program 
for ATST TWX terminals 
(Models 33 and 35) 

113 

**IJLQM9 

Model channel pregram 
for IBM 2260 local 
terminals 

75 

**IJLQNO 

Model channel program 
for IBM 2740 Basic 
terminals 

99 

* *1JLQNl 

Model channel program 
for IEM 2740 Basic 

Dial terminals 

166 

**IJLQN2 

Model channel program 
for IBM 2740 terminals 
with station control 

172 

**IJLQN3 

Model channel pregram 
for IEM 2740 terminals 
with station control 
checking 

221 

* *1JLQN4 

Model channel program 
for IBM 2740 dial 
terminals with transient 
control and checking 

198 

**IJLQN5 

Model channel program 
for IBM 2740 terminals 
with checking 

128 

**IJLQN6 

Model channel program 
for IBM 2740 dial 
terminals with checking 

192 

**IJLQN7 

Model channel program 
for IBM 2740 dial 
terminals with transmit 
control 

156 

**IJLQN8 

Model channel program 
for World Trade Telegraph 
Terminals (WTTA) 

356 

IJLQOA 

Operator awareness 

1380 

IJLQOC 

Operator Control 
(OPCTL) 

3530 

IJLQPA 

Put audio message 
(PUT) 

370 
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Name 


Description 


Bytes 
of Main 
Storage 


IJLQPL 

Polling limit con¬ 
trol (POLLIMIT) 

120 

IJLQPM 

Put complete message 
(PUT) 

480 

IJLQPR 

Put message record 
(PUT) 

544 

IJLQPS 

Put message segment 
(PUT) 

520 

IJLQPZ 

Pause-transmit idle 
characters (PAUSE) 

360 

IJLQQr 

Close message 
control (CLCSEMC) 

474 

IJLQRA 

Translate table 

RCVARU: ARU code 
tc EBCDIC 

266 

IJLQRB 

Translation table 

RCVITA2 (EBCDIC to 
International Telegraph 
Alphabet No. 2) 

266 

IJLQRC 

Translation table RCVZ- 
RCVZC3 (EBCDIC to 
Figure-Protected 

Cede ZSC3) 

266 

IJLQRD 

Retrieve message 
segment by DASD 
address (RETRIEVE) 

124 

IJLQRG 

Route message (ROUTE) 

48 

IJLQRM 

Release message 
(RELEASEM) 

234 

IJLQRR 

Reroute message 
(REROUTE) 

72 

IJICRS 

Retrieve message 
header by sequence 
number (RETRIEVE) 

380 

♦IJLQRW 

Physical input/output 
control 

1569 

Note: 

Net required when the 
system contains cnly 
audio devices. 


IJLQR1 

Translate table 

RCV1030: 1030 to 

EECDIC 

266 

IJLQR2 

Translate table 

RCV1050: 1050 tc 

EBCDIC 

266 

IJLQR3 

Translate table 

RCV1050F: 1050 to 
monocase EBCDIC 

266 
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Module 

Name 

Description 

Bytes 
of Main 
Storage 

IJLQR4 

Translate table 

RCV1060: 1060 to 

EBCDIC 

266 

IJLQR5 

Translate table 

RCV2260: 2260 to 

EECDIC 

266 

IJLQR6 

Translate tables 

RCV83B3 or RCV115A: 

AT&T 83B3 or WU Plan 

115A to EBCDIC 

266 

IJLQR7 

Translate table 

RCVTWX: AT&T Models 

33/35 (TWX) to 

EECDIC 

266 

IJLQR8 

Translate table 

RCV2740: 2740 to 

EBCDIC 

266 

IJLQR9 

Translate table 

RCV2740F: 2740 to 

EBCDIC 

266 

IJLQSB 

Translation table 

SNDITA2 (Interna¬ 
tional Telegraph 

Alphabet No. 2 to 

EBCDIC) 

266 

IJLQSC 

Translation table 

SNDZSC3 (Figure- 
Protected Code ZSC3 
to EBCDIC 

266 

IJLQSH 

Scan message header 

104 

IJLQSI 

Sequence-in number 
verification (SEQIN) 

140 

IJLQSK 

Skip-through-character 
(SKIP) 

76 

IJLQSO 

Insert sequence-cut 
number in message 
header (SEQOUT) 

68 

IJLQSR 

Source terminal name 
verification (SOURCE) 

128 

IJLQSS 

Change audio line 
(STARTARU and STOPARU) 

300 

IJLQST 

Skip-on-count (SKIF) 

48 

IJLQSI 

Translate table 

SND103G: EBCDIC 
to 1030 

266 

IJLQS2 

Translate table 

SND1050: EBCDIC 
tc 1050 

266 
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Module 

Name 

Description 

Bytes 
of Main 
Storage 

IJLQS4 

Translate table 

SND1060: EBCDIC 
to 1060 

266 

IJLQS5 

Translate table 

SND2260: EBCDIC 
to 2260 

266 

IJLQS6 

Translate tables 

SND83B3 or SND115A 

EBCDIC to AT&T 83B3 
or WU Plan 115A 

266 

IJLQS7 

Translate table 

SNDTWXE: EBCDIC to 

AT&T Models 33/35— 

TWX (even parity) 

266 

IJLQS8 

Translate table 

SND2740: EBCDIC TO 

2740 

266 

IJLQS9 

Translate table 

SNDTWXO: EBCDIC 
to AT&T Models 

33/35—TWX (nonparity) 

266 

♦IJLQTA 

World Trade Tele¬ 
graph Terminals 
(WTTA) Line Appen¬ 
dage 

1406 

Note: 

Required if World 

Trade Telegraph support 
is selected. 


IJLQTR 

Code translation 
used in conjunction 
with QTAM or user 
provided translate 
table (TRANS). 

114+226T 

Note: 

T = number 

of translation tables. 


IJLQTS 

Insert time-of-day 
in message header 
(TIMESTMP) 

198 

♦IJLQIT 

Terminal test 
recognition (LPSTART) 

1394 

Note: 

Not required when the 
system contains only audio 
devices. 


Delete Statements 



To delete the QTAM phases from the core image library, the QTAM modules 
from the relocatable library, arid the QTAM bocks from the source 
statement library, the DELET card for the appropriate library and the 
name of the phase, module or beck to be deleted must be supplied. For 
example: 

// JOB DELETE 
// EXEC MAINT 

DELETC $$ECQC01,$$BQWTRl,etc. 

DELETR IJLQBO, I. JLQCI,IJLQCM ,etc . 

DELETS A.EREAKOFF,A.BUFFER,A.CANCELM,etc. 

/& 
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To delete both BTAM and QTAM frcir the cere image, relocatable and 
source statement libraries, the DELET card fer the appropriate library 
and the following entries must be made: For the core image transients, 
you must supply the DELETC, card with a separate entry for each 
transient (QTAM and BTAM) to be deleted. For the core image phase 
names, enter the delete card as fellows: 

DELETC $$BCTC01,$$BC0003,$$BETPRT, etc. 

DELETC IJLE.ALL 
DELETC IJLT.ALL 

To delete bot h BTAM and QTAM from the relocatable library enter the 
delete cards as follows: 

DELETR IJL.ALL 

To delete the BTAM and QTAM books from the source statement library, 
enter the DELETS card with a separate entry fer each beck to be deleted. 
The following example shows the required delete cards and type of 
entries to be made in those cards. 

// JOB DELETE 
// EXEC MAINT 

DELETS A.CONTROL,A.CANCELM, etc. 

/£ 
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SOURCE STATEMENT LIBRARY 


Macro 

T“ 

1 

i 

Blocks 

95 

+ 

1 

1808 


-L- 



A.LINETBL 
A.LIST 
A.LOGSEG 
A.LPSTART 
A.MODE 
A.MSGTYPE 
A.OPCTL 



A.OPTION 

A.PAUSE 

Macros 

A.POLL 

A.POLLIMIT 

A.PCSTARU 

Basic 

A.POSTRCV 

A.ARUMGTYP 

A.POSTSEND 

A.BREAKOFF 

A.PREFIXD 

A.BUFARU 

A.PROCESS 

A.BUFFER 

A.QCBD 

A.CANCELM 

A.RCVHDR 

A.CHECKARU 

A.RCVITA2 

A.CHNGP 

A.RCVSEG 

A.CHNGT 

A.RCVZSC 3 

A.CKREQ 

A.CLOSEMC 

A.RELEASEM 


A.REPEAT 

A.COPYC 

A.REROUTE 

A.COPYP 

A.RETRIEVE 

a.copyq 

A.ROUTE 

A.COPYT 

A.SENDHDR 

A.COUNTER 

A.SENDSEG 

A-CTLTBL 

A.SEQIN 

A.DATESTMP 

A.SEQOUT 

A.DIRECT 

A.SKIP 

A.DTFQT 

A.ENDRCV 

A.SNDITA2 


A.SNDZSC3 

A.ENDREADY 

A.SOURCE 

A.ENDSEND 

A.STARTARU 

A.EOA 

A.STARTLN 

A.EOB 

A.STCBD 

A.EOBLC 

A.STOPARU 

A.ERRMSG 

A.STCPLN 

A.IJLQBABD 

A.TERM 

A.IJLQBFRD 

A.TERMTBL 

A -IJLQBRBD 

A.TERMTBLD 

A.IJLQCKPD 

A.TIMESTMP 

A.IJLQCTLD 

A.TRANS 

A.IJLQDEQU 

A.WORD 

A.IJLQDTFD 

A.WORDTBL 

A.WRU 

A.IJLQLABD 

A.IJLQLCBD 

A.IJLQMCBD 

A.IJLQOBRD 

System Generation 


A,IJLQDSCT 

A.IJLQSVCD 

A.IJLQIP1D 

A.IJLQTBLD 

A.IJLQQCED 

A.INTERCPT 

A.IJLQSTBD 

A.LCBD 

A.IJLQTSVC 

A.LINE 

A.IJLQVECD 
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QTAM STORAGE REQUIREME NTS 


The main storage requirements for QTAM depend tc a great extent on the 
configuration of your teleprocessing installation and the nature of your 
applications. Storage requirements increase prcporticnately as the 
number of communication lines, terminals, and QTAM-provided processing 
functions increase. These requirements can be estimated from formulas 
and tables presented in this module. 

To determine the main storage requirements fcr the Basic QTAM Logic 
modules and the QTAM Device I/C modules, refer to Rel oc atable Li br ary . 


DTFQT (Def ine the Fil e:_ 2TAM) 

Seven types cf DTF tables may be generated by a DTFQT macro instruction. 
The storage estimates for each fellow. 


DASD Message Queues Fil es 
Size = 315 bytes 

Communica t ion Line Group File 
For Nonaudio Line Group 
Size = 48 + (128 + 8x)N 

For Audio Line Group 

Size = 64 + P + (161 + Lj. + L 2 + G + x-z) N 

where: N = number of lines in the line group 

x = a function of the device, given in Figure 29-1 

P = 22 for IBM 7772 cnly 

L ± = length of input buffers 

L 2 = length of address chain buffers 

G = 9 when using time stamping option, otherwise = 0 
z = 17 when information mode is used 


r 

T 
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Figure 29-1. QTAM--Values fcr Ccmmunicaticn Line Grcup Table 

M ain Stor age Pr ocess Queu e 
Size = 84 + 12x 

where: x = 0 for nonmixed application, and 

1 for mixed application 

Main Stor age De stinatio n_Queue 
Size = 80 bytes 

Ch eck po in t Re c ords Fil e 
Size = 220+L 
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where: L = length of the Checkpoint record specified by the SOWA 

keyword operand. 


IBM 7 772 V oc ab ulary Fil e 
Size = 40+4p 


where: P = number of EUFARU macro instructions 


A udio O utpu t Queu e 
Size = 76 bytes 


CON TROL I NFORM ATIO N 

The storage estimates for required control information are shown in 
Figure 29-2. 


j Control Blocks and Information 

1 -- 

Terminal table 

TERMTBL macro instruction 

OPTION macro instruction 


Storage Requirements tin bytes)| 
--- 


TERM macro instruction 1 

LIST macro instruction 1 

PROCESS macro instructicn 1 


12 


No storage is reserved for this 
macro; it defines user areas 
that are included in the expansion 
of the TERM rnacrc instruction 
(U parameter) 


9 + I + U 

+ 

D 

+ 4 4F 

where: (I 

+ 

U 

+ D)<243 

12 + L + 

2N 

+ 

140 2 

where: (3 

+ 

L 

+2N)<243 


13 + A fcr audio process 
program entry 
9 + Y fcr ncnaudic process 
program entry 


Polling list 

POLL macro instruction 3 


4 + 3N for autopclled terminals 
except IBM 1030 

4 + 2N fcr ncnswitched terminals 
or autopolled IBM 1030 

5 for switched IBM terminals 
3+1 for TWX 

4 + T fcr VvTTA terminals 


Queue Control Block for Process 
Queues and Destination Queues 


3 2X 


Audio Line Table 

LINETBL macro instructicn 1 

LINE macro instruction 1 


4 

5 + Z 


Audio Word Table 

WORDTEL macro instruction 1 

WORD macro instruction 1 


1 8 + W 


Figure 29-2. QTAM—Storage Requirements for Control Information (Part 1 
of 2) 
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Buffers 


For Nonaudic Applications: 

Buffer Pool Size = 8+(x+16)N + 24M 

For Audio Applications with IBM 7772: 

Audio Buffer Pool Size = 24 + (X + 88) N 


where: N = number of buffers specified. 

X = size of each buffer 

M = number of CCWs QTAM generates fcr data insertion by the 
PAUSE macro 

r-1 

| where: N = number of terminals | 

| I = number of bytes in terminal ID | 

| U = number of bytes in optional area | 

I D = number of bytes in device address area; size depends on contents: | 


For nonswitched terminal—addressing and polling characters (1 
byte/character) 

For IBM switched terminal--field telling the number of dial digits (1 
byte) + dial digits (1 byte/digit) + addressing characters (1 
byte/character) 

For TWX--field telling the number of dial characters (1 byte) + dial 
digits (1 byte/digit) + field telling the number of ID characters (1 
byte) + ID characters (2 bytes/character) 

For WTTA terminals—1 byte + field telling the number of ID characters (1 
byte) + ID characters (2 bytes/character) 

For IBM 2260 Local—a field of 6 fullwords consisting of a CCB and other 
control information 

L = number of bytes in name of the distribution list entry in terminal table 
( 1 - 8 ) 

A = number of bytes in name of the audio process entry in the terminal table. 
Because the following field in the entry must be aligned to a fullword 
boundary, this field must be either three, seven or eleven bytes long. 

X = number of lines or terminals (depending cn queueing techniques) and the 
number of process queues 


j Y = number of bytes in name cf the process entry in terminal table (1-8) | 

| Z = number of bytes in name of the line entry in line table (1-8) | 

| W = number of bytes of the selected wcrd j 

| F = 1 for IBM 2740 Model 2 terminals with the Euffer Receiver Option; 0 for j 

j other terminals | 

j T = number of bytes in the CPU identification (WTTA terminals) | 

|---I 

I Notes: I 


jl. Add the number of bytes necessary for fullwcrd boundary. | 

12. This number (140) is the number of bytes in the Distribution List module (IJLQDL). | 

j This number is included in the storage requirements only once if the LIST macro is j 

| used more than once. | 

| 3. Add the number of bytes necessary fcr halfword boundary. | 

L_J 


Figure 29-2. QTAM--Storage Requirements for Control Information (Part 2 
of 2) 


Q TAM Macr o In st ructi ons 


Figure 29-3 gives the storage requirements for all other QTAM macro 
instructions. 
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Much QT AM logic consists of rrodules introduced ty the use of certain 
QTAM macro instructions in the user's program. These macro instructions 
expand into in-line coding that establishes the linkage to, and 
parameters for, the QTAM modules. Often a module sc introduced into the 
system itself introduces another module, a process termed a second level 
routine. 


Column two of Figure 29-3 shews the extent cf the ceding produced by 
the expansion of the macro instruction in column one. If the coding 
links to QTAM module, the module is presented in column three; if that 
module links to other modules, they are presented in column four. 


Storage requirements for a sharable module, or for a second level 
routine that is linked to mere than once in the same partition are 
included only once. For example, the macro instructions DIRECT, EOA, 
and ROUTE all link to the same module, IJLQLK. If twe cr mere of these 
macro instructions are used in the same message control program, the 
module is included only once. Similarly, if the same macro instruction 
is used more than once in the same program, storage is required for only 
the additional linkage because the module is included just once. 
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Macro Instruction 


ARUMGTYP 


BREAKOFF 


CANCELM 


CHECKARU 


CHNGP 


CHJSGT 


CKREQ 


CLOSEMC 


CGPYC 


COPYP 


COPYQ 


COPY! 


COUNTER 


DATESTMP 


DIRECT 


ENDRCV 


ENDRCV (WTTA) 


ENDREADY 


ENDSEND 


EOBLC 


In-line 
linkage 
or cede 
Note 5 


70 + 

message 


Sharable modules 


1 Second level 
| routine 


Name j Size 
-+- 


IJLQBC 


IJLQSM 


IJL2SP 


IJLQCT 


IJLQSR 


IJLQQT 


IJL2DC 


IJLQDP 


IJL2UQ 


IJLQDE 


IJLQDT 


IJL2LK 


Note 1 


IJL2EB 


Ncte 1 


Note 1 


IJLQEA 


IJLQEB 


IJL2EC | 380 


| Name 

+- 


-4 - 

| IJLQFL 

-4 - 

I 

4 - 


-4 - 

| IJIQCL 

-4 - 


| ijiqfl 

-4 - 


IJIQEX 


■4 - 

I 

■4 - 

| IJIQSH 
| IJLQSK 
j IJIQR3 
| IJLQMT 
| IJIQIK 


j Ncte 1 


i Note 1 


104 

76 

48 

60 

104 

Note 2 
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Macro Instruction 


In-line 
linkage 
or code 
Note 5 


Sharable modules 


Name 


j Size 


Second level 
routine 


Name 


Size 


ERRMSG 


32 + 
message 
text 


IJIQER 
Note 1 


292 


IJIQIK | 104 


GET 


Segment 

Message 

Record 


IJIQGS 


IJLQGM 


454 

472 


IJIQGR 


500 


GET (AUDIO) 

Audio message 
Audio and non¬ 
audio messages 
Audio message £ 
nonaudio 
record 

Audio message £ 
nonaudio seg¬ 
ment 


IJIQGA 

IJIQGB 

IJIQGC 

IJIQGD 

IJLQir 


324 

732 

760 

714 

140 


INTERCPT 


12 

32 


LOGSEG 


Ncte 3 
304 


LCGSEG (ARU) 


26 

28 

14 


IJLQLG 
Note 1 


LPSTART 


MODE (C) 


MODE (U) 
module £ 
IJIQMM 


44 


IJIQSH 


104 


f- 


MODE (U) 

INITIATE 

PRIORITY 

CONVERSE 

MOD2260 


10 

10 

10 


IJLQMI 

IJIQMP 


IJLQMC 
Note 1 


18 

36 

384 


IJLQSH 


104 


4 

19 


MSGTYPE (C) 


IJLQMT 


60 


IJLQSH 


104 


MSGTYPE (U) 


4 

56 


OPCTL 


IJLQOC 


3610 


IJIQIK 
IJLQSH 
IJIQCL 
Note 1 


104 

104 

549 


Figure 29-3. QTAM—Storage Requirements for Other Macro Instructions 
(Part 2 of 5) 
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Macro Instruction 


In-line 
Linkage 
or cede 
Note 5 


Sharable Modules 


Naire | Size 


Seccnd Level 
routine 


Naire | Size 


PAUSE 


13 + 
insert 
chars. 


IJLQPZ | 360 


Note 1 


POLIIMIT 


IJIQPL 


POSTARU 


Note 1 


POSTRCV 


Ncte 1 


POSTSEND 


Note 1 


Segment 
Message ) 


Record 


IJLQPS 


uigPM 


IJLQPR 


PUT (AUDIO) 


IJLQPA 


RCVSEG Note 4 


RELEASEM 


IJLQRM 


REPEAT 


Ncte 1 


REROUTE 


IJLQRR 
Note 1 


IJLQLK 


RETRIEVE 

DASD address 

By sequence 
number 


IJIQRD 


IJLQRS 


IJIQRD 


ROUTE 


IJLQRC 


IJLQLK 

IJIQSH 


SENDHDR 


SENDSEG Note 4 


SEQIN 


IJLQSI 


IJLQSH 


SEQOUT 


8 | IJIQSO 


IJIQEX 


SKIP (CT) 


8 | IJLQST | 48 


IJLQSH | 104 
_ i _ 


Figure 29-3. QTAM—Storage Requirements fer Other Macrc Instructions 
(Part 3 of 5) 
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Macro Instruction 


In-line 
linkage 
or cede 
Note 5 


Sharable rrcdules 


Name | Size 


Second level 
routine 


| Si ze 


SKIP (S) 


8 + nc. 

to te 
skipped 


IJIQSK | 76 


IJIQSH | 104 


SOURCE 


IJLQSR 


IJLQSH | 104 


STARTARU 


IJIQSS 


IJLQFL | 78 


STARTIN 


IJIQCL 


IJLQFL | 78 


STOPARU 


IJIQSS 


IJIQEL | 78 


STOPLN 


IJLQCL 


IJLQFL 4 78 


TIMESTMP 


IJIQTS 


IJIQEX | 70 


TRANS 


IJIQTR 


114 + 
266 *T 


Figure 29-3. QTAM—Storage Reguirements fer Other Macro Instructions 
(Part 4 of 5) 


where: 

C = character operand specified (conditional) 

Q = character operand null (unconditional) 

S = skip to and include designated character configuration 
CT = skip designated count of nonblank characters 
T = number of translation tables 

Translation tables are: RCV1030, RCV1050, RCV1050F, RCV1060, RCV2260, RCV2740, 
RCV2740F, RCVARU, RCV83B3, RCV115A, RCVTWX, RCVITA2, RCVZSC3, SND1030, SND1050, 
SND1060, SND2260, SNDITA2, SNDZSC3, SNE2740, SNE83B3, SND115A, SNETWXE, and 
SNETWXO 

Notes: 

1. These delimiters or modules cause linkages tc QTAM routines included in Easic QTAM 
L og ic M od ules listed earlier in this ircdule under Reloca tab le Libra ry.. 

2. If the macro instruction MSGTYPE, ROUTE, or SKIP (S) is used in the program, the 
storage estimate for IJLQMT, IJLCRG, cr IJLQSK, respectively, is not included in 
the storage estimate for EOA. 

3. Because the user defines his own DTFxx and xxMCD macros for his message log file, 
the size requirements cannot be specified here. Information to determine the 
storage requirements for the specific logging medium is given under the pertinent 
DTF and Module, i.e., DTFMT and MTMOD fer Tape. Modules 4-11 contain storage 
requirements for declarative macros. 

4. Identifies entry point for RCVSEG and SENDSEG subgroups of LPS. 

5. The linkage requirements for OPEN, CLOSE, GET, and PUT are given in Module 1. 


Figure 29-3. QTAM—Storage Requirements fer Other Macrc Instructions (Fart 5 of 6) 
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M PS Utili t y M a cro Storage Requi rements 


Figure 30-1 gives the main storage 
requirements for the MPS utility macro 
instructions. These macros are designed sc 
that a file-to-file utility program can fit 
in a 2K foreground program area (4K if the 


INTCR macro is used). To determine the 
size of the macro when expanded, add the 
variable requirements to, or subtract them 
frcir, the basic expansion requirement. 
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Figure 30-1. MPS Utility Macro Storage 
Requirements (Part 1 of 3) 
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Figure 30-1. 


MPS Utility Macro Storage Requirements (Part 2 of 3) 
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Figure 30-1. MPS Utility Macrc Storage Requirements (Part 3 of 3) 


Multiprogramming Examples 


Multiprogramming capabilities are demonstrated by the multiprogramming 
example. A control program supporting multiprogramming and the MPS 
utilities is required. A card-to-printer utility macrc lists fifteen 
test cards containing the instructions and necessary operator commands 
to initiate the job in the foreground-one (FI) area. The 
card-tc-printer utility macrc is first cataloged and then assembled and 
executed as a background job. The fifteen test cards are listed on the 
printer. When the last card in the reader has been read and processed, 
the following message will be printed on SYSLOG: 
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0P08A INTERV REQ SYSRDR ... 


To clear the intervention required condition on the reader, enter the 
following two cards in the reader and ready the device: 


/& 

// PAUSE REFER TO PRINTER FOR ADDITIONAL INSTRUCTIONS 


You can new initiate this same program in the foreground area by 
following the instructions previously listed cn SYSLST when the jot was 
run in the background problem area. 


The same data previously used for the background execution (fifteen 
test cards) is used as input data for the foreground execution. The 
data cards must, therefore, be removed from the card reader output 
stacker and they must be replaced in the input hepper. Then the card 
reader is made ready. Now follow the instructions contained in the test 
data to initiate the job in the foreground area. 


Several assumptions have been made in the multiprogramming examples. 
The first assumption is that a foreground-one area has previously been 
allocated. If this has not been dene, refer tc the DO S Op er atin g Guide , 
GC24-5 0 22. 


The second assumption is that SYSRDR or SYSIPT is assigned to 00C, 
and that SYSLST is assigned to 00E and that there are nc other logical 
units assigned to these devices. If this is not the case, message 


1A13E CONFLICTING I/O ASSIGNMENTS 


is issued on SYSLOG when you try tc initiate the program in the 
foreground area. To recover from this condition, reply CANCEL to the 
preceding message. The message 


FI 0S02I JOB FG INIT. CANCELED DUE TO PROGRAM REQUEST 


is then issued. Then press the Request key cn SYSI.OG. The message 
1I60A READY FOR COMMUNICATIONS 

is issued. Next, enter the START command followed by 
ASSGN SYSXXX,UA 


where xxx is the unit(s) retaining a background assignment for the 
indicated device. You can new initiate the jot in the foreground-cne 
area as previously described. To execute this example, enter the 
following cards: 
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// JOB CATALOG SAMPLE FOREGRCUND/BACKGROUND PROGRAM 
// OPTION CATAL 

PHASE CARDPRNT, +0 
// EXEC ASSEMBLY 

Column 1 0 
PRINT NOGEN 
START 0 
INCARD 

OUTPRT EUFSIZ=80 
END 

/* 

// EXEC LNKEDT 
/S 

// JOB EXECUTE SAMPLE FOREGROUND/BACKGROUND PROGRAM 
// ASSGN SYS001,X'00C' (Note 1) 

// ASSGN SYS002,X* 00E* (Note 2) 

// PAUSE CARD READER END-OF-FILE SIGNALS END OF CARD INPUT 
// EXEC CARDPRNT 

* THESE COMMENTS AND THE FOLLOWING STATEMENTS ARE TEST INPUT 

* NOW IN A PAUSE STATUS , UNASSIGN THE PRINTER (X'OOE') AND THE CARD 

* READER (X'OOC') TO PERMIT SUBSEQUENT ASSIGNMENT TO FOREGROUND 

* AREA. TO DO THIS, TYPE THE FOLLOWING 
ASSGN SYSRDR,UA 

ASSGN SYSIPT,UA (Note 3) 

ASSGN SYSLST,UA 

* TO SUSPEND BACKGROUND (BG) AREA PROCESSING T3PE 
STOP 

* TO INITIATE PROGRAM NAMED CRDPRNT IN FOREGROUNDl (FI) AREA, 

* THE FOLLOWING FOUR STATEMENTS ARE TO BE TYPED ON SYSLOG (1052) 

START FI (Note 4) 

ASSGN SYS001,X'OOC* (Note 1) 

ASSGN SYS002,X'00E* (Note 2) 

// EXEC CARDPRNT 

Note 1: SYS001 must be assigned to a card reader. 

Note 2: SYS002 must be assigned to a printer. 

Note 3: These cards are required cnly if SYS001 cr SYS002 retain a 

background assignment. A device used by a foreground program 
cannot be assigned to a background area at the same time. 

Note 4: This command is processed by the ATTN routine (Refer to DOS 
Operating Guid e, GC24-5022.) 

The test cards for the multiprogramming example are output on SYS002, 
which was previously assigned tc the system printer. LOG must be keyed 
on SYSLOG at the beginning of the job to obtain a complete listing of 
all job control cards and messages 

SYSLOG output is shown in Figure 30-2. 


SYSLST Output Contains : 

• Job control cards 

• External symbol dictionary 

• Source program listing 

• Relocation dictionary 

• Diagnostics 

• Linkage editor storage map 

• List of test cards processed by card-to-printer utility program 
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r 


t 


| EG // JOE CATALOG SAMPLE FOREGROUND/BACKGROUND PROGRAM | 

| BG EOJ CATALOG | 

I I 

| BG // JOB EXECUTE SAMPLE FOREGROUND/BACKGROUND PROGRAM | 

| EG // PAUSE CARD READER END-OF-FILE SIGNALS END CF CARD INPUT j 

I BG I 

| BG OP08A INTERV REQ SYSRDR=00C | 

I CCSW = 021000224002000000 SNS = 400000000000 CCB=002220 | 

| BG EOJ EXECUTE | 

I BG // PAUSE REFER TO PRINTER FOR ADDITIONAL INSTRUCTIONS | 

j BG assgn sysrdr,ua | 

| BG assgn sysipt,ua | 

| BG assgn syslst,ua | 

j BG stop | 

| AR 1160A READY FOR COMMUNICATIONS. | 

j AR start fl | 

| Fl assgn sys001,x*00c' | 

j Fl assgn sysC02 , x*OOe' | 

| Fl exec cardprnt | 

| Fl OS10I PROGRAM CARDPRNT COMPLETED | 

L_J 

Figure 30-2. MPS—SYSLOG Cutput for Multiprogramming Examples 
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Modular Index 


alternate track assignment disk 
core image library 365 
delete statement 365 
linkage edit statements 365 
module names 365 
modules, number of 365 
phase names 365 
phases, number of 365 

card to disk 

delete statement 366 
linkage edit statements 366 
module names 366 
modules, number of 365 
number library blocks, core image 365 
phase names 366 
phases, number of 365 
card to printer and/or punch 

core image library blocks 365 
delete statement 366 
linkage edit statements 366 
module names 366 
modules, number of 365 
phase names 366 
phases, number of 365 
clear disk 

core image library blocks 365 
delete statement 367 
linkage edit statements 366 
module names 366 
modules, number of 365 
phase names 366 
phases, number of 365 
copy disk to card 

core image library blocks 365 
delete statement 367 
linkage edit statements 367 
module names 367 
modules, number of 365 
phase names 367 
phases, number of 365 
copy disk to disk 

core image library blocks 365 
delete statement 367 
linkage edit statements 367 
module names 367 
modules, number of 365 
phase names 367 
phases, number of 365 

disk to card 

core image library blocks 365 
delete statement 367 
linkage edit statements 367 


module names 367 
modules, number of 365 
phase names 367 
phases, number of 365 
disk to disk 

core image library blocks 365 
delete statement 368 
linkage edit statements 368 
module names 368 
modules, number of 365 
phase names 368 
phases, number of 365 
disk to printer 

core image library blocks 365 
delete statement 368 
linkage edit statements 368 
module names 368 
modules, number of 365 
phase names 368 
phases, number of 365 
sample problems 368-372 

initialize disk 

core image library blocks 365 
delete statement 373 
linkage edit statements 373 
module names 373 
phase names 373 
phases, number of 365 

macros, IBM-supplied 
UTDKPRl 368 
UTDKPR2 368 
UTDKPR3 368 

restore card to disk 

core image library blocks 365 
delete statement 373 
linkage edit statements 373 
module names 373 
modules, number of 365 
phase names 373 
phases, number of 365 

transients, IBM-supplied 
$$BLISTV 373 

VTOC display 

delete statement 373,374 
linkage edit statements 373,374 
module names 373,374 
modules, number of 365 
phase names 373 
phases, number of 365 
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The library requirements for the programs of the Group 1 Utilities are 
the following: 


r -i 

I Libraries: | 
I Core image Relo c atable j 
I Component Bl o cks Unique j 


Phases 

2311 

2314/ 

Modules 

Blocks 

[Utilities Group 1 (Note 1): 

44 

122 

2319 

125 


657 

[Alternate Track Assignment Bisk 

5 

26 

27 

6 


|Card to Disk 

5 

10 

10 

4 


| Card to Printer and/or Punch 

5 

12 

12 

4 


[Clear Disk 

3 

4 

4 

2 


j Copy Disk to Card 

2 

7 

7 

3 


|Copy Disk to Disk 

2 

7 

8 

3 


| Disk to Card 

5 

11 

11 

4 


[Disk to Disk 

5 

11 

11 

2 


|Disk to Print (Note 2) 

5 

12 

12 

2 


[Initialize Disk 

4 

14 

15 

5 


|Restore Card to Disk 

1 

4 

4 

2 


|VTOC Display: 

1 

3 

3 

2 


| Transient 

1 

1 

1 




Note 1 : The following are the various combinations of utility modules 
common to Group 1: 

• Common modules in Group 1 are: IJWLVT and IJWLV1, which 
require 22 blocks. 

• Common modules for Groups 1 and 3 are: IJWCLD2, IJWCLD3, 
IJWDD3, IJWDD4, IJWDP3, and IJWEP4, which require 97 blocks. 

• Common modules for all 3 groups are: IJWGEK and IJWLAB, 
which require 19 blocks. 

• The block count for all common modules is included in the 
total for the group. 

N ote 2: The disk-to-printer utility program has three sample problems 
in the source statement library that requires three blocks. 


P ARTI TI ON SIZE 


RELO CAT A BLE LIBRARY 


10,240 bytes 

N ote : To delete all utilities. Group 1, 

Group 2 and Group 3 use the following 
statement: 

DELETR IJW.ALL 


Modules 


IJWAE 

IJWADl 

IJWAE2 

IJWAD3 

IJWAE4 

IJWAD5 


Alternate Track Assignment Disk 


Lin k age Edi t St ate m ent s 


C ORE IMAG E L IBRARY 


INCLUDE IJWAD 
// EXEC LNKEDT 


Phase s 


ATAD 
ATAD2 
ATAD 3 
ATAD4 
ATAD 5 


Dele te St atements 


DELETR IJWAD 
EELETR IJWAD1 
DELETR IJWAD2 
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DELETR IJWAE3 

DELETR IJWAD4 

DELETR IJWAE5 

RELOCATABLE LIBRARY 

Modules 

Card to Disk 

IJWCF 

IJWCP1 

IJWCP3 

CORE IMAGE LIBRARY 

IJWCP4 

IJWGEN 

Phases 

IJWLAB 

CDDK 

CDDK2 

CDDK3 

CDDK4 

Linkaqe Edit Statements 

CDDK 5 

INCLUDE IJWCP 

PHASE CDPP5,1JWCPCS2,NCAUTO 
INCLUDE IJWLAB 

RELOCATABLE LIBRARY 

Modules 

IJWCD 

IJWCD1 

// EXEC LNKEDT 

Delete Statements 

IJWCD3 

DELETR IJWCP 

IJWCD4 

EELETR IJWCP1 

IJWGEN 

DELETR IJWCP3 

IJWLAB 

EELETR IJWCP4 


Linkaqe Edit Statements 

Clear Disk 

INCLUDE IJWCD 



PHASE CDDK5,IJWCDCS2,NOAUTO 


INCLUDE IJWLAB 

CORE IMAGE LIBRARY 

// EXEC LNKEDT 

Phases 


Delete Statements 

CLRDSK 

CLRD2 

CLRD3 


DELETR IJWCD 

DELETR IJWCD1 

DELETR IJWCD3 



DELETR IJWCD4 

RELOCATABLE LIBRARY 


Modules 


Card to Printer/Punch 

IJWCLD 

IJWCLDl 


CORE IMAGE LIBRARY 

IJWCLD2 
IJWCLD3 


Phases 



CDPP 

CDPP2 

CDPP 3 

Linkaqe 

Edit Statements 

CDPP4 

INCLUDE IJWCLD 

CDPP5 

// EXEC 

LNKEDT 
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Delete Statements 

Linkaqe Edit Statements 

DELETR IJWCLC 

INCLUDE IJWRD 

DELETR IJWCLD1 

// LELT'YP NSD(nn) 

// EXEC LNKEDT 

Copy Disk to Card 


CORE IMAGE LIBRARY 

Delete Statements 

Phases 

DELETR IJWRD 

DELETR IJWRD1 

CRDC 

CRDC2 

DELETR IJWRD2 

RELOCATABLE LIBRARY 



Disk to Card 

Modules 


IJWKC 

IJWKCl 

CORE IMAGE LIBRARY 

IJWKC2 

Phases 


DKCD 

Linkage Edit Statements 

DKCD2 

DKCD3 

DKCD4 

INCLUDE IJWKC 

DKCD5 

// LBLTYP NSE(nn) 

// EXEC LNKEDT 

RELOCATABLE LIBRARY 

Delete Statements 

Modules 

DELETR IJWKC 

IJWDC 

DELETR IJWKCl 

IJWDC1 

DELETR IJWKC2 

IJWDC3 

IJWDC4 

IJWGEN 

IJWLAB 

Copy Disk to Disk 


CORE IMAGE LIBRARY 

Linkaqe Edit Statements 

Phases 

INCLUDE IJWDC 

PHASE DKCD5,1JWDCCS 2,NOAUTO 

CRDD 

INCLUDE IJWLAB 

CRDD2 

// EXEC LNKEDT 

RELOCATABLE LIBRARY 

Delete Statements 

Modules 



DELETR IJWDC 

IJWRD 

DELETR IJWDCl 

IJWRD1 

DELETR IJWDC3 

IJWRD2 

DELETR IJWDC4 
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Disk to Disk 


Phases 


CORE_IMAGE_LIBRARY 

Phases 


DKDK 

DKDK2 

DKDK3 

DKDK4 

DKDK5 


R ELOC ATABL E L IBRARY 
Modules 


IJWDD 

IJWDD1 

IJWDD3 

IJWDD4 

IJWGEN 

IJWLAB 


Linka ge E di t State me nts 


INCLUDE IJWED 

PHASE DKDK5,IJWDDCS2,NOAUTO 
INCLUDE IJWLAB 
// EXEC LNKEDT 


Delete Statements 


DELETR IJWDD 
DELETR IJWBDl 


Disk to Printer 


CORE IMAGE LIBRARY 


DKPR 
DKPR2 
DKPR 3 
EKPR4 
DKPR5 


RELOCATABLE LIBRARY 


Modules 


IJWDP 

IJWDPl 

IJWDP3 

IJWDP4 

IJWGEN 

IJWLAB 


L in kage Edit S tate m ent s 


INCLUDE IJWDP 

PHASE DKPR5,IJWDPCS2,NCAUTO 
INCLUDE IJWLAB 
// EXEC LNKEDT 


D elete Statements 


DELETR IJWDP 
EELETR IJWDPl 


SOURCE STATEME NT LIBRARY 
Sample Problems 


Z.UTDKPR1 
Z.UTDKPR2 
Z.UTDKPR3 


SAMPLE PROBLEM SU M MAR Y 

Figure 31-1 defines the file required by the disk-to-printer sample 
problems. Figure 31-2 illustrates the cards punched when the sample 
problems are retrieved from the source statement library. 


r-1 

jDisk Extent Number| 



-+- -1 

| SYS004|SYS005 | 


L_JL_J 

Figure 31-1. DKPR—Sample Problem File Requirements 
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T-1 

Card Cels. 
77-80 


Cards 

Retrieved 


Card Cels. 
73-76 


+- 


ChTA LS Z.UTDKPR1 
BKEND Z. (JTDKPR1 
D-P Control Cards 
(2 Cards) 

BKEND 

CA.TA.LS Z.UTDKPR2 
BKEND Z.UTEKPR2 
D-P Control Cards 
(2 Cards) 

BKEND 

C&TA.LS Z.UTDKFR3 
BKEND Z.UTEKPR3 
D-P Control Cards 
(2 Cards) 

BKEND 


$461 


$461 


$461 


0001-0002 


0101-0102 


0201-0202 


Figure 31-2. DKPR--Sarrple Problem Card Decks 
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D is k- to-P ri nt er Utility 1 


Prograrr Name is Z.UTDKPR1. The disk-to-printer utility sample problem 
lists the numbers handled by the Assembler 2 and disk scrt/merge sample 
problems. To execute the disk-to-printer utility sample problem, you need 
the following job control cards: 

Col. 16 Cel. 54 Cel. 72 

T ♦ T 

// JOB DKPR 

// PAUSE ASSGN SYS004 TO SCRATCH PACK 
// ASSGN SYS004,X* cuu' 

// PAUSE ASSGN SYS005 TO THE PRINTER 
// ASSGN SYS005,X* cuu' 

// UPSI 0000 

// BLBL UIN,'SORTED FILE OF 2000 RECORDS FOR UTILITIES'[,yy/ddd] 

// EXTENT SYS004,hhhhhh,l,0,1800,43 
// EXEC DKPR 

D-P Control Cards (2 cards) 

/* 

/& 

Note: Replace hhhhhh in the EXTENT card with the volume serial number cf 

the disk pack. 


SYSIQG_Output_Is: 

// JOB DKPR 

// PAUSE ASSGN SYS004 TO SCRATCH PACK 
// PAUSE ASSGN SYS005 TO THE PRINTER 
EOJ DKPR 

SYSLST Ou tput Summar y: 

• Job control cards 

• Disk-to-printer control cards 

• Utility parameter statements (10 lines) 

• Numbers 0001-2000 (400 lines) 

• NUMBER CF INPUT BLOCKS PROCESSED 000400 

• NUMBER OF OUTPUT BLOCKS PROCESSED 000400 

• END OF JOB 
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Disk-to -Print er Ut il ity 2 


Program Name is Z.UTDKPR2. The disk-tc-printer utility sample problem 
lists the numbers handled by the Assembler 5 and tape and disk sort/irerge 
(2311 application) sample problems. Tc execute the disk-to-printer utility 
sample problem, you need the following job control cards are needed: 


Col. 16 Col. 54 

T T 

// JOB DKPR 2311 TO PRINTER 

// PAUSE ASSGN SYS004 TO SCRATCH PACK 

// ASSGN SYS004,X"cuu' 

// PAUSE ASSGN SYS005 TO THE PRINTER 
// ASSGN SYS00 5,X* cuu* 

// UPSI 000 

// ELBL UIN,'SORTED FILE OF 2000 RECORDS FOR UTILITIES'[,yy/ddd] 
// EXTENT SYS004,hhhhhh,l,0,1710,33 
// EXEC DKPR 

Disk-to-printer utility control cards (2 cards) 

/* 

/£ 


C ol. 7 2 


Note : Replace hhhhhh in the EXTENT card with the volume serial number cf 

the disk pack. 


SYSLOG_0utput_Is: 

// JOB DKPR 2311 TO PRINTER 
// PAUSE ASSGN ON SYS004 TO SCRATCH PACK 
// PAUSE ASSGN SYS005 TO THE PRINTER 
EOJ DKPR 

S YS L ST Output Summa ry: 

• Job control cards 

• Utility parameter statements (10 lines) 

• Numbers 0001-2000 (400 lines) 

• NUMBER OF INPUT BLOCKS PROCESSED 000400 

• NUMBER OF OUTPUT BLOCKS PROCESSED 000400 

• END OF JOB 
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D isk - to-P r int er Utility 3 


Program Name is Z.UTDKPR3. The disk-tc-printer utility sample problem 
lists the numbers handled by the Assembler 6 and tape and disk sort/rrerge 
(2314/2319 application) sample problems. Tc execute the disk-to-printer 
utility sample problem, you need the following job control cards:: 

Col. 16 Col. 54 Col. 72 

_ T _ 

// JOB DKPR 2314/2319 TO PRINTER 
// PAUSE ASSGN SYS004 TO SCRATCH PACK 
// ASSGN SYS004,X'cuu' 

// PAUSE ASSGN SYS005 TO THE PRINTER 
// ASSGN SYS005,X'cuu* 

// UPSI 000 

// DLBL UIN,'SORTED FILE OF 2000 RECORDS FOR UTILITIES'[,yy/ddd] 

// EXTENT SYS004,hhhhhh,l,0,3420,63 
// EXEC DKPR 

Disk-to-printer utility control cards (2 cards) 

/* 

/& 

Not e: Replace hhhhhh in the EXTENT card with the volume serial number of 

the disk pack. 


SYSL QG output Is: 

// JOB DKPR 2314/2319 TO PRINTER 
// PAUSE ASSGN SYS004 TO SCRATCH PACK 
// PAUSE ASSGN SYS005 TO THE PRINTER 
EOJ DKPR 

SYSLST Output S um mary: 

• Job control cards 

• Disk-to-printer control cards 

• Utility parameter statements (10 lines) 

• Numbers 0001-3000 (600 lines) 

• NUMBER OF INPUT BLOCKS PROCESSED 000600 

• NUMBER OF OUTPUT BLOCKS PROCESSED 000600 

• END OF JOB 
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Initialize Disk 


L in k age Edit St ate me nts 


CO RE IMAGE LIBRARY 
Phases 


INCLUDE IJWRC 
// LELTYP NSD(nn) 
// EXEC LNKEDT 


INTD 

INTD2 Delet e Statements 

INTD 3 

INTD4 

DELETR IJWRC 
EELETR IJWRC1 

RELOC AT ABL E LIBRARY 
M odul es 

VTOC Display 

IJWID 

IJWID1 

IJWID2 CORE IMAGE LIBR ARY 

IJWID3 

IJWID4 Phases 


Linkage E dit S ta t emen ts 


LVTOC 


INCLUDE IJWID 
// EXEC LNKEDT 


Transient 


$$BLISTV List VTOC 

D elet e Sta tem ents Note: $$BLISTV is cataloged into the core 

iirage library along with the VTOC program. 

DELETR IJWID 
DELETR IJWID1 

DELETR IJWID2 RELOC ATABLE LIBRAR Y 

DELETR IJWIE3 

DELETR IJWID4 Modules (EJS) 


Restore Card to Disk 


IJWLVB 

IJWLVT 

IJWLV1 


CORE IMAGE LIBRAR Y 
Phases 


Linkage Edit S tatements, 
Nc n -irultiprcqrammi n q Syste m 


CRCD INCLUDE IJWLVB 

// LELTYP TAPE 
// EXEC LNKEDT 

R ELOC ATABL E L IBRARY 

Modules Delet e Statements, Non-roultip r oqrairminq 

S yste m 

IJWRC 

IJWRC1 EELETR IJWLVB 


Module 31: Utilities, Group 1—360N-UT-461 373 











Modules (MPS) 


Del e te Statements, Multiprogramming Sy s tem 


IJWLVM DELETR IJWLVM 

IJWLVT 

IJWIV1 


Li nka ge Edit St ateme nts,_ Multiprogra m min g 

S yste m 


INCLUDE IJWLVM 
// EXEC LNKEDT 
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Modular Outline 


Partition Size.377 

Card to Tape.377 

Core Image Library.3 77 

Phases.377 

Relocatable Library.377 

Modules.377 

Linkage Edit Statements.377 

Delete Statements.377 

Copy Disk or Data Cell to Tape.378 

Core Image Library.37 8 

Phases.378 

Relocatable Library.378 

Modules.37 8 

Linkage Edit Statements.378 

Delete Statements.378 

Data Cell tc Tape.37 8 

Core Image Library.378 

Phases.378 

Relocatable Library.378 

Modules.378 

Linkage Edit Statements.378 

Delete Statements.37 8 

Disk to Tape.378 

Core Image Library.37 8 

Phases.37 8 

Relocatable Library.37 8 

Modules.37 8 

Linkage Edit Statements.37 8 

Delete Statements.37 8 

Initialize Tape.379 

Core Image Library.379 

Phase.379 

Relocatable Library.379 

Module.37 9 

Linkage Edit Statements.379 

Delete Statements.379 

Restore Tape-to-Disk or Data Cell . . .379 

Cere Image Library.379 

Phases.379 

Relocatable Library.379 

Modules.37 9 

Linkage Edit Statements.379 

Delete Statements . 379 

Tape Compare.379 

Core Image Library . 379 

Phases. 379 

Relocatable Library . 379 

Modules.379 


Linkage Edit Statements.379 

Delete Statements.379 

Tape tc Card.379 

Core Image Library.379 

Phases.379 

Relocatable Library.380 

Modules.380 

Linkage Edit Statements.380 

Delete Statements.380 

Tape to Data Cell.380 

Cere Image Library.380 

Phases.380 

Relocatable Library.380 

Modules.380 

Linkage Edit Statements.380 

Delete Statements.380 

Tape to Disk.380 

Cere Image Library.380 

Phases.380 

Relocatable Library.380 

Modules.380 

Linkage Edit Statements.380 

Delete Statements.380 

Tape tc Printer.381 

Core Image Library.381 

Phases.381 

Relocatable Library. 381 

Modules.381 

Linkage Edit Statements.381 

Delete Statements.381 

Source Statement Library.3 81 

Sample Problems.381 

Sample Problem Summary.3 81 

Tape to Printer Utility, Sample 

Problem 1.382 

SYSLCG Output.382 

SYSLST Output Summary.3 82 

Tape to printer Utility, Sample 

problem 2.383 

SYSLOG Output.383 

SYSLST Output Summary.383 

Tape to Tape.3 84 

Cere Image Library.384 

Phases . 384 

Relocatable Library.384 

Modules.384 

Linkage Edit Statements.384 

Delete Statements.384 
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Modular Index 


card to tape 

core image library blocks 377 
delete statement 377 
linkage edit statements 377 
module names 377 
modules, number of 377 
phase names 377 
phases, number of 377 
copy disk or 2321 to tape 

core image library blocks 377 
delete statement 378 
linkage edit statements 378 
module names 378 
modules, number of 377 
phase names 378 
phases, number of 377 

data cell to tape 

core image library blocks 378 
delete statement 378 
linkage edit statements 378 
module names 378 
modules, number of 377 
phase names 378 
phases, number of 377 
disk to tape 

core image library blocks 377 
delete statement 378 
linkage edit statements 378 
module names 378 
modules, number of 377 
phase names 378 
phases, number of 377 

initialize tape 

core image library blocks 377 
delete statement 379 
linkage edit statements 379 
module names 379 
phase names 379 
phases, number of 377 

macros, IBM-supplied 
UTTPPR1 381,382 
UTTPPR2 381,383 

restore tape to disk or data cell 
core image library blocks 377 
delete statement 379 
module names 379 
modules, number of 377 


phase names 379 
phases, number of 377 
tape compare 

core image library blocks 377 
delete statement 379 
linkage edit statements 379 
module names 379 
modules, number of 377 
phase names 379 
phases, number of 377 
tape to card 

core image library blocks 377 
delete statement 380 
linkage edit statements 380 
module names 380 
modules, number of 377 
phase names 379,380 
phases, number of 377 
tape to data cell 

core image library blocks 377 
delete statement 380 
linkage edit statements 380 
module names 380 
modules, number of 377 
phase names 380 
phases, number of 377 
tape to disk 

core image library blocks 377 
delete statement 380 
linkage edit statements 380 
module names 380 
modules, number of 377 
phase names 380 
phases, number of 377 
tape to printer sample problems 381-383 
tape to printer 

core image library blocks 381 
delete statement 381 
linkage edit statements 381 
module names 381 
modules, number of 377 
phase names 381 
phases, number of 377 
tape to tape 

core image library blocks 377 
delete statement 384 
linkage edit statements 384 
module names 384 
modules, number of 377 
phase names 384 
phases, number of 377 
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The library requirements fcr the 
the following: 

programs 

cf the 

Group 2 

Utilities 

are 

r . ■ 

1 



Libraries: 


1 

1 

Core Image 

Relocatable 

1 

|Component 


Blocks 

Unique 


1 

i Phases 

2311 

2314/ 

Modules 

Blocks 

1 

1 



2319 



1 

1 

|Utilities Group 2 (Note 1): 

47 

103 

104 


472 

1 

1 

|Card to Tape 

5 

10 

10 

4 


1 

|Copy Disk or Data Cell to Tape 

2 

7 

7 

3 


1 

|Data Cell tc Tape 

5 

10 

10 

2 


1 

j Disk to Tape 

5 

10 

10 

2 


1 

(Initialize Tape 

1 

3 

3 

1 


1 

j Restore Tape to Disk or Data 






1 

| Cell 

1 

4 

4 

2 


1 

|Tape Compare 

3 

5 

5 

5 


1 

(Tape to Card 

5 

11 

11 

4 


1 

|Tape to Data Cell 

5 

11 

11 

2 


1 

(Tape to Disk 

5 

11 

11 

2 


1 

(Tape to Printer (Note 2) 

5 

11 

12 

4 


1 

|Tape to Tape 

L 

5 

10 

10 

4 


1 


Note 1: Following are the various combinations of utility modules 
common to Group 2: 

• Common modules within Group 2 are: IJWDT3, IJWDT4, IJWTD3, 
and IJWTD4, which require 67 blocks. 

• Common modules fcr all 3 groups are: IJWGEK and IJWLAE, 
which require 19 blocks. 

• The block count for common modules within Group 2 is 
included in the total for the group. 

N ote 2: The tape-to-printer utility program has twc sample problems in 
the source statement library that requires twc Hocks. 


PARTITION SIZE 

Modules 

10,240 

bytes 

IJWCT 

Note: 

To delete all utilities. Group 1, 

IJWCTl 


Group 2 and Group 3 use the 

IJWCT3 


following statement: 

IJWCT4 

IJWGEN 

DELETR IJW.ALL 

IJWLAE 


linkage Edit St ate m ent s 

Card to Tape 

INCLUDE IJWCT 

PHASE CDTP5,IJWCTCS2,NCAUTO 

CORE_IMAGE_LIBRAPY INCLUDE IJWLAB 

// LELTYP TAPE 

Phases // EXEC LKKEDT 


CDTP 

CDTP2 D el ete St ateme n ts 

CDTP 3 ....~~ 

CDTP4 

CDTP5 DELETR IJWCT 

EELETR IJWCTl 
DELETR IJWCT3 

RELOCATABLE LIBRARY EELETR IJWCT4 
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Copy Disk or Data Cell to Tape 


Linkage Edit Statem e nts 


CORI_IMAGE_LIBRARY INCLUDE IJWMT 

.. “ ” ' .. “. PHASE ECTP 5,IJWMTCS 2, NOAUTO 

P hase s INCLUDE IJWLAB 

// IBITYP TAPE 

// EXEC LNKEDT 

CRDT 

CRDT2 


RELOCATABLE_LIBRARY Delete Statements 

M odules 

DELETR IJWMT 
DELETR IJWMTl 

IJWKT 

IJWKT1 

IJWKT2 

Disk to Tape 

L inkage E dit St atements 

CORE IMAG E LI B RARY 

INCLUDE IJWKT 

// LBLTYP NSD(nn) Phases 

// EXEC LNKEDT 


Delete Statemen ts 

DELETR IJWKT 
DELETR IJWKT1 
DELETR IJWKT2 

Data Cell tG Tape 

CORE IMAGE LI BRAR Y 
Phases 


DKTP 
DKTP2 
DKTP3 
DKTP 4 
DKTP 5 


RELOCATABLE LIB RAR Y 
Modules 


IJWDT 
IJWDTl 
IJWDT3 
IJWDT4 
IJNGEN 
IJWLAB 


DCTP 

DCTP2 

DCTP3 Linka ge E dit St ate ments 

DCTP 4 .~ 

DCTP5 

INCLUDE IJWDT 

PHASE DKTP5,IJWDTCS2,NOAUTO 

BIIdOCATAELE_LIBRARY INCLUDE IJWLAB 

// LBLTYP TAPE 

Modules // EXEC LNKEDT 


IJWDT3 

IJWDT4 

IJWGEN 

IJWLAB 

IJWMT 

IJWMTl 


Delet e Statement s 

DELETR IJWDT 
DELETR IJWDTl 
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Initialize Tape 

C ORE IMAGE LIBR ARY 
Pha se 

I NTT 

R ELOC ATABL E LIBRARY 
M odul e 

IJWIT 

L inka ge Edi t Statement s 

PHASE INTT,*,NOAUTO 
INCLUDE IJWIT 
// EXEC LNKEDT 

D el ete Sta tements 

DELETR IJWIT 

Restore Tape-to-Disk 

CORE_IMAGE_LIBRARY 

P has es 

CRTD 

REL OCAT AB LE LIERA RY 
M od ules 

IJWRT 

IJWRT1 

L inka ge E d it Stateme nts 

INCLUDE IJWRT 
// LBLTYP NSD(IO) 

// EXEC LNKEDT 


Delete Statements 


DELETR IJWRT 
EELETR IJWRTl 


Tape Compare 


CORE IMAGE LIBRARY 

Phases 


TPCP 
TPCP2 
TPCP 3 


RELOCATAB LE LIB RAR Y 
M odules 


IJWTCP 
IJWTCP2 
IJWTCP3 
IJWTPCP 
IJWXIT 


L ink a ge Edi t State m ents 


PHASE TPCP,*,NCAUTC 
INCLUDE IJWTCP 

or Data Cell include ijjcpdo 

INCLUDE IJWXIT 
INCLUDE IJWTPCP 
// LBLTYP TAPE 
// EXEC LNKEDT 


Delete Statements 


EELETR IJWTPCP 
DELETR IJWTCP 
EELETR IJWTCP2 
EELETR IJWTCP3 
DELETR IJWXIT 


Tape to Card 


CORE IMAGE LIBRARY 

Phases 


TPCD 

TPCD2 
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TPCD3 

TPCD4 

TPCD5 


RELQCATAELE_LIERARY 

Modules 


IJWGEN 

IJWLAB 

IJWTC 

IJWTCl 

IJWTC3 

IJWTC4 


L in ka ge E dit State me nts 


INCLUDE IJWTC 
PHASE TPCDS , IJWTCCS2 
INCLUDE IJWLAB 
// LBLTYP TAPE 
// EXEC LNKEDT 


Delete Stat ements 


DELETR IJWTC 
DELETR IJWTC1 
DELETR IJWTC3 
DELETR IJWTC4 


Tape to Data Cell 


CORE_IMAGE_LIBRARY 

Phases 


TPDC 
TPBC2 
TPDC 3 
TPDC4 
TPDC 5 


RELOCATAELE_LIBRARY 

Modules 


IJWGEN 

IJWLAB 

IJWTD3 

IJWTD4 

IJWTM 

IJWTM1 


Linkage Edit Statements 


INCLUDE IJWTM 

PHASE TPCD5,1JWTMCS 2,NOAUTO 
INCLUDE IJWLAB 
// LBLTYP TAPE 
// EXEC LNKEDT 


Delete Statement s 


DELETR IJWTM 
DELETR IJWTM1 


Tape to Disk 


NOAUTO 

CORE IMA GE LIB RARY 
Phases 


TPDK 
TPDK2 
TPDK 3 
TPDK 4 
TPDK5 


RELOCATABLE LIBRARY 


Modules 


IJWGEN 

IJWLAB 

IJWTD 

IJWTD1 

IJWTD3 

IJWTD4 


Linka ge Edi t S t ate rr ent s 


INCLUDE IJWTD 

PHASE TFDK5 , IJWTDCS2,KCAUTO 
INCLUDE IJWLAB 
// LBLTYP TAPE 
// EXEC LNKEDT 


Del e te S tatements 

DELETR IJWTD 
DELETR IJWTD1 
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Tape to Printer 


SOURCE STATEMENT LIBRARY 


C ORE IMAGE LI BRAR Y 


Sair pl e Problem s 


Phases 


TPPR 

TPPR2 

TPPR3 

TPPR4 

TPPR5 


R ELOC ATABLE LIBRARY 
Modules 


IJWGEN 

IJWLAB 

IJWTP 

IJWTPl 

IJWTP3 

IJWTP4 


Z.UTTPPR1 
Z.UTTPPR2 


SAMPIE P RCBLEM SUMM ARY 

Figure 32-1 defines the files required by 
these sairple problems. Figure 32-2 
illustrates the card decks punched out when 
the sample problems are retrieved from the 
source statement library. 

r- t-t 

|Disk Extent No. 1 |Tape Drive No. 2| 

t-+- i 

| SYSRES | SYSC04 | 

L- X _J 

Figure 32-1. TPPR—Sample Problem File 
Requirements 


L inka ge Ed it St atemen ts 


INCLUDE IJWTP 

PHASE TPPR5,IJWTPCS2,NOAUTO 
INCLUDE IJWLAB 
// LBLTYP TAPE 
// EXEC LNKEDT 


Delete Statements 


DELETR IJWTP 
DELETR IJWTPl 
DELETR IJWTP3 
DELETR IJWTP4 


Cards 

Retrieved 


Card Cols. 
73-76 


Card Cels 
77-80 


CATALS Z.UTJPPRl 
BKEKD Z.UTTPPRl 
T-P Control Cards 
(2 Cards) 

EKEND 

CATALS Z.UTTPPR2 
BKEND Z.UTTPPR2 
T-P Control Cards 
(2 Cards) 

BKEND 


$462 


$462 


C 0 Cl-0002 


C1G1-0102 


Figure 32-2. TPPR—Sample Problem Card 
Decks 
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Ta pe to P rint er Utility /_Sample Pro bl e m 1 


Program Name is Z.UTTPPRl. The Tape-to-Printer Utility sample problem 
lists the numbers handled by the assembler 1 and tape scrt/merge sample 
problems, allowing the user to check for proper functioning of all three 
programs. 

To execute the tape to printer utility sample problem, you need the 
following job control cards: 

// JOB TPPR 

// PAUSE ASSGN SYS004 TO SYS001 OF PREVIOUS JOB 
// ASSGN SYSC04,X * CUU' 

// PAUSE ASSGN SYS005 TO THE PRINTER 
// ASSGN SYS005,X'cuu' 

// UPSI 1000 
// EXEC TPPR 

T-P Contrcl Cards (2 cards) 

/* 

/& 

The operator must reply IT IS EOF to the legged message fcy entering Y and 
EOE/END from SYSLOG.. 


S YSI OG Out put 
// JOB TPPR 

// PAUSE ASSGN SYS004 to SYS001 OF PREVIOUS JOE 
// PAUSE ASSGN SYS005 TO THE PRINTER 
8001D IS IT EOF 
Y 

EOJ TPPR 

SY SLS T Ou tp ut Summar y: 

• Job control cards 

• Tape-to-printer control cards 

• Utility parameter statements (11 lines) 

• Numbers 0001-2000 (400 lines) 

• IS IT EOF 

• REPLY Y 

• END OF DATA 

• NUMBER OF INPUT BLOCKS PROCESSED 000400 

• NUMBER OF OUTPUT BLOCKS PROCESSED 000400 

• END OF JOB 
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Tape to Print e r Utility, S am ple P rcbleir 2 


Program Name is Z.UTTPPR2. The Tape-tc-Printer Utility sample problem 
lists the numbers handled by the Assembler 4 and tape and disk sort/merge 
C24C0 application) sample programs. 

To execute the tape to printer utility sample problem, you need the 
following job control cards: 

// JOB TPPR 24 CO TO PRINTER 

// PAUSE ASSGN SYS004 TO SYS001 OF PREVIOUS JOB 
// ASSGN SYS004,X' CUU' 

// PAUSE ASSGN SYS005 TO THE PRINTER 
// ASSGN SYS005,X 'cuu' 

// UPSI 1000 
// EXEC TPPR 

Tape-to-printer utility control cards (2 cards) 

/* 

/& 

The operator must reply tc the logged message by entering Y and ECE/END 
from SYSLOG. 


S YSLQ G Ou tput 

EG // JOE TPPR 2400 TO PRINTER 

EG // PAUSE ASSGN SYS004 TC SYS001 OF PREVIOUS JOE 
EG 

BG // PAUSE ASSGN SYS 005 TC THE PRINTER 
BG 

BG 800 ID IS IT EOF 
Y 

EG EOJ TPPR 

SYS1S T Out pu t Summary : 

• Job control cards 

• Tape-to-printer control cards 

• Utility parameter statements (11 lines) 

• Numbers 0001-2000 (400 lines) 

• IS IT EOF 

• REPLY Y 

• END OF DATA 

• NUMBER CF INPUT BLOCKS PROCESSED 000400 

• NUMBER CF OUTPUT BLOCKS FRCCESSED 000400 

• END OF JOB 
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Tape to Tape 


CORE IM AGE LIB RAR Y 
Phases 


TPTP 

TPTP2 

TPTP3 

TPTP4 

TPTP5 


REL OCAT ABLE LIBRA RY 
Modules 


IJWGEN 

IJWLAB 

IJWTT 

IJWTT1 

IJWTT3 

IJWTT4 


L inkage E d it Statemen ts 


INCLUDE IJWTT 

PHASE TPTP5,IJWTTCS2,NOAUTO 
INCLUDE IJWLAB 
// LBLTYP TAPE 
// EXEC LNKEDT 


Delete Statements 


DELETR IJWTT 
DELETR IJWTTl 
DELETR IJWTT3 
DELETR IJWTT4 
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Modular Outline 


Partition Size . ..386 

Alternate Track Assignment Data Cell . .386 

Cere Image Library.386 

Phases.386 

Relocatable Library.386 

Modules. 386 

Linkage Edit Statements.3 86 

Delete Statements.386 

Clear Data Cell.386 

Core Image Library.386 

Phases.387 

Relocatable Library.387 

Modules.387 

Linkage Edit Statements.387 

Delete Statements.387 

Data Cell to Data Cell.387 

Core Image Library.387 

Phases.387 

Relocatable Library.387 

Modules.387 

Linkage Statements.387 

Delete Statements.387 

Data Cell to Disk.387 

Core Image Library.387 

Phases.387 

Relocatable Library.387 

Modules.387 

Linkage Edit Statements.387 


Delete Statements.3 87 

Data Cell tc Printer.388 

Core Image Library.388 

Phases.388 

Relocatable Library . .388 

Modules.388 

Linkage Edit Statements.388 

Delete Statements.388 

Source Statement Library.3 88 

Sample Problem ..38 8 

Data Cell-to-Printer Sample 

Problem Summary.389 

SYSL03 Output Is.38 9 

SYSLST Output Summary.3 89 

Disk to Data Cell.390 

Core Image Library.390 

Phases.390 

Relocatable Library.390 

Module.390 

Linkage Edit Statements.390 

Delete Statements.390 

Initialize Data Cell.390 

Core Image Library.390 

Phases.3 90 

Relocatable Library.390 

Modules.390 

Linkage Edit Statements.390 

Delete Statements.390 
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The following are the library requirements for the Group 3 Utility 
programs: 


r 



Libraries: 


Core image 

Relocatable 

|Component 


Blocks 

Unique 


Phases 

2311 

2314/ 

Modules Blocks 




2319 


lUtilities Group 3 (Note 1): 

32 

74 

76 

326 

|Alternate Track Assignment 

5 

17 

17 

6 

| Data Cell 





|Clear Data Cell 

3 

4 

4 

2 

jData Cell to Data Cell 

5 

11 

11 

2 

|Data Cell tc Disk 

5 

11 

11 

2 

| Data Cell to Printer (Note 2) 

5 

12 

12 

2 

|Disk to Data Cell 

5 

11 

11 

2 

(Initialize Data Cell 

i 

4 

8 

10 

5 


N ote 1: Following are the various combinations cf utility modules common 
to Group 3: 

• Common modules fcr Groups 1 and 3 are: IJWCLD2, IJWCLD3, 
IJWDD3, IJWDD4, IJWDP3, and IJWEP4. 

• Common modules for all 3 groups are: IJWGEN and IJW1AE. 

• The block count for common modules is net included in the total 
for the group. 

N ote 2: The data cell-to-printer utility program has cne sample problem in 
the source statement library that requires cne block. 


PARTITI ON SIZE IJ'wAN2 

IJfcAM3 

10,240 bytes IJWAM4 

IJKAM5 

N ot e: To delete all Group 1, Group 2, and 

Group 3 utilities, use the following 
statement: 

DELETR IJW.ALL Lin ka ge Edit S t ate men ts 


INCLUDE IJWALTM 

Alternate Track Assignment Data Cell /7 exec lnkedt 


C ORE IMAGE LIB RAR Y 
Phases 


ATAM 
ATAM2 
ATAM 3 
ATAM4 
ATAM 5 


Delete Statements 


DELETR IJKALTM 
EELETR IJWAMl 
DELETR IJWAM2 
EELETR IJWAM3 
EELETR IJWAM4 
DELETR IJfaAM5 


RELOCATABLE LIB RARY 

M odules Clear Data Cell 

IJWALTM 

IJWAM1 CORE IMAG E L IB RAR Y 
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Phases 


lin ka ge Statements 


CLDC INCLUDE IJWMM 

CLDC2 PHASE DCDC5,IJWMMCS2,KCAUTO 

CLDC3 INCLUDE IJWLAB 

// EXEC LNKEDT 


REL OCA TABLE LIB RARY 


Modules 


Del ete S tatements 


IJWCLM 

IJWCLM1 

IJWCLD2 

IJWCLD3 


EELETR IJWMM 
DELETR IJWNMl 


Data Cell to Disk 


L inkage E d it St atements 

.. CORE IMAGE LIBRARY 


INCLUDE IJWCLM 


// EXEC LNKEDT 

Phases 


ECDK 

Delete Statements 

DCDK2 


DCDK3 


ECDK 4 

DELETR IJWCLM 

DCDK5 

DELETR IJWCLMl 



RELOCATA BLE L I BRAR Y 


Data Cell to Data Cell 

Modules 


QORE_IMAGE_LIBRARY 

Phases 


DCDC 
DCDC2 
DCDC 3 
DCDC4 
DCDC5 


IJWDD3 

IJWDD4 

IJWGEN 

IJWLAB 

IJWMD 

IJWMD1 


Linkage Edit State me nts 


INCLUDE IJWMD 

RE LOC ATABLE L IBRA RY PHASE DCDK5 f IJWMDCS2,NOAUTO 

INCLUDE IJWLAB 

Modules // EXEC LNKEDT 


IJWDD3 

IJWDD4 

IJWGEN 

IJWLAB 

IJWMM 

IJWMM1 


Delete Statements 


EELETR IJWMD 
DELETR IJWMDl 
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Data Cell to Printer 


Lin k age Edit Statements 


C ORE IMAGE LIBRARY 
Phases 


INCLUDE IJWMP 

PHASE ECPR5,IJWMPCS2,N0AU10 
INCLUDE IJWIAB 
// EXEC INKEDT 


DCPR 

DCPR2 

DCPR3 

DCPR4 

DCPR5 


Delete Statements 


DELETR IJWMP 

REL OCATABLE LI BRARY EEIETR IJWNP1 

M odules 

S OURCE S TATEME N T L I BRA RY 

IJWDP3 

IJWDP4 

IJWGEN S amp le Problem 

IJWIAB 

IJWMP 

IJWMP1 Z.UTDCPRl 


388 


DOS Version 4 System Generation 






D ATA C ELL -TG- PRIN T ER SAMP L E PROBLEM SUMMA RY: 

Program Name is Z.UTDCPRl. The data cell-to-printer sample problem lists 
the numbers that the Assembler 3 sample problem wrote on the data cell. 
Figure 33-1 illustrates the card deck produced when the sample problem is 
retrieved from the source statement library. Eisk extent number 1 must be 
assigned to SYS004. 

r- t-t-T 

|Cards (Card Cels. |Card Cels. | 

|Retrieved | 73-76 | 77-80 | 

j.-f-+- 

|CATALS Z.UTDCPRl | | | 

|BKEND Z.UTDCPRl | | 1 

j DC-P Control Cards | | j 

| (2 Cards) | $463 |0001-0002 | 

|BKEND | | | 

L_0._X_J 

Figure 33-1. UTILITIES—Sample Problem Card Deck 

To execute the data cell-to-printer sample problem, the following jcb 
control cards are needed: 

Col. 16 Col. 54 

t I 

// JOB DCPR 

// PAUSE ASSGN SYS004 TO DATA CELL 
// ASSGN SYS004,X *cuu' 

// PAUSE ASSGN SYS005 TO THE PRINTER 
// ASSGN SYS005,X'cuu 1 
// UPSI 0000 

// DLBL UIN,'SAMPLE PROBLEM FILE OF 100 RECORDS’[,yy/ddd] 

// EXTENT SYS004,hhhhhh,1,0,10200,20,,B=3 
// EXEC DCPR 

DC-P Control Cards (2 cards) 

/* 

/£ 

N ote : Replace hhhhhh in the EXTENT card with the volume serial number cf 

the data cell. 


SYSLO G Output Is: 

// JOB DCPR 

// PAUSE ASSGN SYS004 TO THE DATA CELL 
// PAUSE ASSGN SYS005 TO THE PRINTER 
EOJ DCPR 

S YSLST Output Summary : 

• Job control cards 

• Data cell-to-printer control cards 

• Utility parameter statements (10 lines) 

• Number 0100-0001 (100 lines) 

• NUMBER OF INPUT BLOCKS PROCESSED 000100 

• NUMBER CF OUTPUT BLOCKS PROCESSED 000100 

• END OF JOB 


Col. 72 

T 


Module 33: Utilities- Group 3—360N-UT-463 389 










Disk to Data Cell 


Initialize Data Cell 


C ORE IMAGE LIBRARY 


CORE IMAGE LIBRARY 


Phases 


Phases 


DKDC 
DKDC2 
DKDC 3 
DKDC4 
DKDC 5 


INTM 
INTM2 
INTM 3 
INTM4 


R ELOC ATABL E LIBRA RY 
Module 


RELOCATABLE LIBRARY 
Modules 


IJWDD3 

IJWDD4 

IJWDM 

IJWDM1 

IJWGEN 

IJWLAB 


IJWIM 
IJWIMl 
IJWIM2 
IJWIM3 
IJWIM4 


Lin kage Ed it Statements 


Linkage Edit Statements 


INCLUDE IJWIM 

INCLUDE IJWDM // EXEC LNKEDT 

PHASE DKDC5,IJWDMCS2,NOAUTO 
INCLUDE IJWLAE 
// EXEC LNKEDT 

Delete S tatements 


Delete Statements 


DELETR IJWDM 
DELETR IJWBM1 


DELETR IJWIM 
DELETR IJWIM1 
DELETR IJWIM2 
DELETR IJWIM3 
DELETR IJWIM4 
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Module 34: System Utilities - 370N-UT-491 


Modular Outline 


Partition size.393 

Assign Alternate Track Disk.3 93 

core image library.393 

Phases.393 

relocatable library.3 93 

Modules.393 

Linkage Edit Statements.393 

Delete Statements.393 

Assign Alternate Track Data Cell . . . .393 

Core Image Library.393 

Phases.393 

relocatable library.393 

Modules.393 

Linkage Edit Statements.394 

Delete Statements.394 

Clear Disk.394 

Cere Image Library.394 

Phases.394 

relocatable library.394 

Modules.394 

Linkage Edit Statements.394 

Delete Statements.394 

Clear Data Cell.394 

cere image library.394 

Phases.394 

relocatable library.394 

Modules 394 

Linkage Edit Statements.394 

Delete Statements.394 

Copy Disk to Card.394 

core image library.394 

Phases.394 

relocatable library.394 

Modules.395 

Linkage Edit Statements.395 

Delete Statements.395 

Copy Disk to Disk.395 

Core Image Library.395 

Phases.395 

relocatable library.395 

Modules.395 

Linkage Edit Statements.395 

Delete Statements.395 

Copy Disk or Data Cell tc Tape.3 95 

cere image library.395 

Phases.395 

relocatable library.395 

Modules.395 

Linkage Edit Statements.395 

Delete Statements.395 

Initialize Disk.395 

Cere Image Library.395 

Phases.39 5 


Relocatable Library.395 

Modules.395 

Linkage Edit Statements.396 

Delete Statements.396 

Initialize Data Cell.396 

Core Image Library.396 

Phases.396 

relocatable library.396 

Modules.396 

Linkage Edit Statements.396 

Delete Statements.396 

Initialize Tape.396 

core image library.396 

Phase.396 

relocatable library.396 

Modules.396 

Linkage Edit Statements.396 

Delete Statements.396 

Restore Card to Disk.396 

Core Image Library.396 

Phase. 3 96 

relocatable library.396 

Modules.3 96 

Linkage Edit Statements.396 

Delete Statements.3 97 

Restore Tape to Disk or Data Cell . . .397 

core image library.397 

Phase.397 

relocatable library.397 

Modules.. .397 

Linkage Edit Statements.397 

Delete Statements.3 97 

VTOC Display. .397 

core image library.397 

Phase.397 

Transient.397 

relocatable library.397 

Modules (BJS).397 

Linkage Edit Statements, 


Non-Multiprogramming System . . . .397 
Delete StateMents, 

Non-multiprogramming System . . . .397 


Modules (MPS).397 

Linkage Edit Statements, 
Multiprogramming System .... . .397 
Delete Statements, 

Multiprogramming System.397 

Clear Disk Utility, Sample Froblem . . .398 

SYSLOG Output Is.398 

SYSLST Output Summary.398 

Initialize Disk Utility, Sample Problem 399 

SYSLOG Output Is.399 

SYSLST Output Summary.39 9 
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Modular Index 


assign alternate track data cell 
core image library blocks 393 
delete statements 394 
linkage edit statements 394 
module names 393, 394 
modules, number of 393 
phase names 393 
phases, number of 393 
assign alternate track disk 

core image library blocks 393 
delete statements 393 
linkage edit statements 394 
module names 393 
modules, number of 393 
phase names 393 
phases, number of 393 


clear data cell 

core image library blocks 393 
delete statements 394 
linkage edit statements 394 
module names 394 
modules, number of 393 
phase names 394 
phases, number of 393 
clear disk 

core image library blocks 393 
delete statements 394 
linkage edit statements 394 
module names 394 
modules, number of 393 
phase names 394 
phases, number of 393 
sample problem 398 
copy disk or data cell to tape 

core image library blocks 393 
delete statements 395 
linkage edit statements 395 
module names 395 
modules, number of 393 
phase names 395 
phases, number of 393 
copy disk to card 

core image library blocks 393 
delete statements 395 
linkage edit statements 395 
module names 395 
modules, number of 393 
phase names 394 
phases, number of 393 
copy disk to disk 

core image library blocks 393 
delete statements 395 
linkage edit statements 395 
module names 395 
modules, number of 393 


phase names 395 
phases, number of 393 

initialize data cell 

core image library blocks 393 
delete statements 396 
linkage edit statements 396 
module names 396 
modules, number of 393 
phase names 396 
phases, number of 393 

initialize disk 

core image library blocks 393 
delete statements 396 
linkage edit statements 396 
module names 395 
modules, number of 393 
phase names 395 
phases, number of 393 
sample problem 399 

initialize tape 

core image library blocks 393 
delete statements 396 
linkage edit statements 396 
module names 396 
modules, number of 393 
phase names 396 
phases, number of 393 

restore card to disk 

core image library blocks 393 
delete statements 397 
linkage edit statements 396 
module names 396 
modules, number of 393 
phase names 396 
phases, number of 393 

restore tape to disk or data cell 
core image library blocks 393 
delete statements 397 
linkage edit statements 397 
module names 397 
modules, number of 393 
phase names 397 
phases, number of 393 

transients, IBM-supplied 
$$BLVTOC 397 

VTOC display 

core image library blocks 393 
delete statements 397 
linkage edit statements 397 
module names 397 
modules, number of 393 
phase names 397 
phases, number of 393 
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The library requirements for the Utility programs are the following: 

r - n 

I Libraries: | 

I Core Ima ge R el o catabl e | 


Component 


Phases 


Blocks 


Modules 




2311 

2314/ 

3330 






2319 



Assign Alternate Track 

Disk 

5 

26 

27 

29 

6 

Assign Alternate Track 

Data Cell 

5 

17 

17 

19 

6 

Clear Disk 


3 

5 

5 

5 

4 

Clear Data Cell 


3 

‘ 5 

5 

5 

4 

Copy Disk to Card 


2 

7 

7 

7 

3 

Copy Disk to Disk 


2 

7 

8 

8 

3 

Copy Disk or Data Cell 

to Tape 

2 

7 

7 

7 

3 

Initialize Disk 


4 

16 

16 

17 

5 

Initialize Data Cell 


4 

8 

10 

11 

5 

Initialize Tape 


1 

3 

3 

3 

2 

Restore Card to Disk 


1 

4 

4 

5 

2 

Restore Tape to Disk or 

Data Cell 

1 

4 

5 

5 

2 

VTOC Display 


1 

3 

3 

4 

4 

Transient 


1 

1 

1 

1 



PAR TITION SIZE L in ka ge Edit St ate me nt s 

10,240 bytes 

INCLUDE IJWATD 

Note: To delete all utilities, use the // EXEC LNKEDT 

following statement: 

EELETR IJW.ALL 

Delete Statements 


Assign Alternate Track Disk 


CORE_IMAGE_LIBRARY 


Phases 


ALTDK 

ALTDK2 

ALTDK3 

ALTDK4 

ALTERS 


RELOCATABLE LIERARY 


Modules 


IJWATD 
IJWATD1 
IJWATD2 
IJWATD3 
IJWATD4 
IJWATD5 


EELETR IJWATD 
DELETR IJWATDl 
DELETR IJWATD2 
EELETR IJWATD3 
DELETR IJWATD4 
EELETR IJWATD5 


Assign Alternate Track Data Cell 


CORE IMAGE LIB RARY 
Phases 


ALTDC 
ALTEC2 
ALTDC3 
ALTDC4 
ALTDC5 


RELO CATA BLE LIBRAR Y 
Modules 


IJWATM 

IJWATM1 
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IJWATM2 Note: Cnly if CLEAR DATA CELL net 

IJWATM3 performed. 

IJWATM4 
IJWATM5 


L in ka ge Edit Statement s 


Clear Data Cell 


INCLUDE IJWATM 
// EXEC LNKEDT 


COR E INAGE LIBRARY 
Phases 


D elete Statements 


DELETR IJWATM 
DELETR IJWATM1 
DELETR IJWATM2 
DELETR IJWATM3 
DELETR IJWATM4 
DELETR IJWATM5 


CLRDC 

CLRDC2 

CLRDC3 


REL OCAT ABLE LI B RAR Y 
Modules 


Clear Disk 


IJWCCM 

IJWCCM1 

IJWCCD2 

IJWCCD3 


CORE IMAGE LIBRARY 


P hase s 


Linkage Edit State m ents 


CLRDK 

CLRDK2 

CLRDK3 


INCLUDE IJWCCM 
// EXEC LISKEDT 


R ELOC ATABL E L I BRA RY 


Delete Statements 


Modules 


IJWCCD 
IJWCCD1 
IJWCCD2 
IJWCCD3 


DELETR IJWCCM 

DELETR IJWCCM1 

DELETR IJWCCD2 (See note) 

DELETR IJWCCD3 (See note) 

N ot e: Cannot delete if already deleted by 

CLEAR DISK. 


L inkage Edit S t atements 


INCLUDE IJWCCD 
// EXEC LNKEDT 


Copy Disk to Card 

C ORE IMAGE LIBRARY 


D elete St at em ents 


Phases 


CDKCD 

DELETR IJWCCD CDKCD2 

DELETR ijWCCDl 

DELETR IJWCCD2 (See note) 

DELETR IJWCCD3 (See note) RELO CATABLE LI B RAR Y 


394 DOS Version 4 System Generation 













Modules 


Copy Disk or Data Cell to Tape 


IJWCDC 

IJWCDC1 

IJWCDC2 


L in k age E d it St atements 


INCLUDE IJWCDC 
// LELTYP NSC(nn) 
// EXEC LNKEDT 


D elete Statements 


DELETR IJWCEC 
DELETR IJWCEC1 
DELETR IJWCDC2 


Copy Disk to Disk 


CORE_IMAGE_LIBRARY 

P hase s 


CDKDK 

CDKDK2 


RELOCAT ABLE LIBRARY 
M odul es 


IJWCDD 
IJWCDD1 
IJWCDD2 


Lin kage Edit Statements 


INCLUDE IJWCDD 
// LBLTYP NSE(nn) 
// EXEC LNKEDT 


D elete St a te m ents 


DELETR IJWCEE 
DELETR IJWCEE1 
DELETR IJWCDD2 


CORE IMA G E LIB RARY 
Phases 


CDKTP 

CDKTP2 


REL OCAT ABLE LIBRAR Y 
Modules 


IJWCET 
IJWCDT1 
IJWCET2 


lin ka ge Edit Statements 


INCLUDE IJWCDT 
// LBLTYP NSD(nn) 
// EXEC LNKEDT 


D elete Statements 


DELETR IJWCDT 
DELETR IJWCDT1 
DELETR IJWCDT2 


Initialize Disk 


C ORE IMAGE LIBRARY 
Pha s es 


INTDK 
INTDK2 
INTDK3 
INTDK4 


RELO CAT A BLE LIBRAR Y 
Modules 


IJWIND 
IJWINDl 
IJWIND2 
IJWIND3 
IJWIND4 
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L ink a ge Edit Statement s 


INCLUDE IJWIND 
// EXEC LNKEDT 


Delete Statem en ts 


DELETR IJWIND 
DELETR IJWINDl 
DELETR IJWINE2 
DELETR IJWIND3 
DELETR IJWIND4 


Initialize Data Cell 


CORE IMAGE LIBRARY 


Phases 


INTDC 
INTDC2 
INTDC3 
INTEC4 


RELOCATABLE_LIBRARY 


M odul es 


IJWINM 

IJWINM1 

IJWINM2 

IJWINM3 

IJWINM4 


Lin kage Edi t Statements 


INCLUDE IJWINM 
// EXEC LNKEDT 


Delete Statements 


DELETR IJWINM 
DELETR IJWINMl 
DELETR IJWINM2 
DELETR IJWINM3 
DELETR IJWINM4 


Initialize Tape 

CORE IMAGE LIBRARY 
Phase 

INTTP 

RELOCATABLE LIBRARY 
Modules 

IJWINT 

IJWINT1 

Linkage Edit Statements 

INCLUDE IJWINT 
// EXEC LNKEDT 

Delete S tatements 

DELETR IJWINT 
DELETR IJWINT1 

Restore Card to Disk 

CORE IMAGE LIBRAR Y 
Phase 

RCDDK 

RELOC ATABLE LIBRARY 
Modules 

IJWRCD 

IJWRCD1 

Linkage Edit Statement s 

INCLUDE IJWRCD 
// LBLTYP NSD(nn) 

// EXEC LNKEDT 
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Delete Statements 


N ot e: $$BLVTOC is cataloged into the core 

image library along with the VTGC 
program. 

DELETR IJWRCD 
DELETR IJWRCD1 


REL O CAT A BLE LIBRARY 


Restore Tape to Disk or Data Cell 

Modul es (BJS ) 


CORE IMAG E LIBRARY 
P hase 


IJWLTVB 
IJWLTVT 
IJWLTV1 


RTPDK 


REL0CATAELE_L1ERARY 

Modules 


L in ka ge Edit Statem en ts , 
N on-Mul t ipr o gr a mmi ng Sy s te m 


INCLUDE IJWLTVB 

IJWRTD // LELTYP TAPE 

IJWRTD1 // EXEC LNKEDT 


L inkage E dit St atem ents 


Delet e Stat eMents, Non- mult iprog ra mm ing 
Sys tem 


INCLUDE IJWRTD 
// LBLTYP NSC(10) 
// EXEC LNKEDT 


DELETR IJWLTVB 

DELETR IJWLTVT DELETR IJWLTVl 


Delete Stat em en ts 


Modules (MPS) 


DELETR IJWRTD 
DELETR IJWRTDl 


IJWLTVM 

IJWLTVT 

IJWLTVl 


VTOC Display 

L in kage Edi t S tate me nt s , Mu lt ip r og r amming 
S ys tem 

C ORE IMAGE LIBR AR Y 

P hase INCLUDE IJWLTVM 

// EXEC LNKEDT 

LVTOC 

D el et e St ateme n ts, Multip ro gramming Sys tem 

Tra ns ie nt 

DELETR IJWLTVM 
DELETR IJWLTVT 

$ $BLVTOC DELETR IJWLTVl 
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C LEAR DISK UT ILITY, SA MPLE PROBLE M 


The Clear Disk utility sample problem prefcrrrats cylinders 1 - 10 of a 333C 
disk with fixed-length blocks containing count, key, and data areas. Key 
areas are 9 bytes in length each; each data area is 80 bytes long. Both 
key and data areas are filled with hexadecimal zeros (X'OO*, defined by the 
X'xx' parameter of the utility modifier statement). 

To execute the Clear Disk sample problem, you need the following jcb 
control cards: 

// JOB CLRDK 

// PAUSE ASSGN SYS000 TO THE 3330 DISK TO BE CLEARED 
// DLBL UOUT,* DISK LABEL' 

// EXTENT SYS000,,1,0,00019,00190 
// EXEC CLRDK 

// UCL E=(K=9,D=80),X'00',OY,E=(3330) 

// END 
/& 


SYSLOG_Output_Is: 

// JOB CLRDK 

// PAUSE ASSGN SYS000 TO THE 3330 DISK TO EE CLEARED 
ASSGN SYS000,X* cuu' 

EOJ CLRDK 

S YSIS T Output Summa ry: 

• Job Control Cards 

• Clear Disk control card 

• Utility parameter statements (10 lines) 

• END OF JOE 
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INIT IAL IZE DISK UT ILITY, SAMPLE PR OBLEM 


The initialize disk utility sarrple probleir initializes a 3330 disk pack. 

The VTOC is written on cylinder 0. 

To execute the initialize disk sairple probleir, ycu need the following jet 
control cards: 

// JOB INIT 

// PAUSE ASSGN SYS000 TO THE 3330 DISK TO BE INITIALIZED 
// EXEC INTDK 
UID IQ 

// VTOC STANDARD 
VOLlll1111 
// END 
/& 

If any unexpired files are encountered, the message 
8118D UNEXPIRED FILE 

is displayed. Type in 2 and press END tc delete the file. Any other reply 
results in termination of the job. 


SYSLOG Output Is: 

// JOB INIT 

// PAUSE ASSGN SYS000 TO THE 3330 DISK TO BE INITIALIZED 
ASSGN SYSOOO,X'cuu' 

81201 END OF INIT.DISK 
EOJ INIT 

S YSLS T Output S ummar y: 

• Job control cards 

• Initialize disk control card 

• 81201 END OF INITIALIZE DISK 

• END OF JOB 
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Module 35: EREP - 370N-UT-492 


Modular Outline 

Partition Size.402 

Cere Iirage Library.402 

Phases.402 

Relocatable Library.402 

Modules.402 

Linkage Edit Statements.403 

Delete Statements.403 
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P ART ITION SIZE 
10.240 bytes. 


C ORE IMAGE LIBRARY 



r' 

1 



Blocks 


Phases 

_ T - 

1 

2311 

“T“ 

1 

T 

2314/ | 

3330 


1 


1 

2319 | 


68 

-+- 

I 

112 

-4- 

i 

4' 

114 | 

123 


_x_ 


_x. 

_x_ 



Modular Outline 


Phases 


EREP 

EREPADTP 

EREPASTA 

EREPCOH 

EREPCCHC 

EREPCl3 5 

EREPC145 

IJBERDE 

EREPDOLD 

EREPEDCP 

EREPEDCR 

EREPEDCU 

EREPEDDA 

EREPEDES 

EREPEDDl 

EREPEDIT 

EREPEDTD 

EREPEDTP 

EREPEDTR 

EREPEDT1 

EREPEDUR 

EREPEDUl 

EREPEDXl 

EREPEOD 

EREPESPT 

EREPESTR 

EREPESWK 

EREPHIST 

EREPIPL 

EREPMCAR 

EREPMCRC 

EREPMNTR 

EREPM145 

EREPRETV 

EREPSHRT 


EREPSHRU 

EREPSMCP 

EREPSMCR 

EREPSMCU 

EREPSMDA 

EREPSMD1 

EREPSMES 

EREPSMTD 

EREPSMTP 

EREPSMTR 

EREPSMTl 

EREPSMUR 

EREPSMU1 

EREPSPCL 

EREPTES 

EREPTPEl 

EREPUCCM 

EREPUNIT 

EREPUOLD 

EREP145A 

EREP145E 

EREP145C 

EREP145D 

EREP2400 

EREP 2715 

EREP3211 

EREP 333X 

EREP333Y 

EREP333Z 

EREP 3330 

EREP 3410 

EREP3420 

EREP3500 


RELOCATABLE LIB RAR Y 


Modules 

T~ 

! 

x 

Blocks 

70 

T 

1 

509 


_X_ 



Modules 


IJBEREP 
IJBEADTP 
IJEEASTA 
IJBECCH 
IJBECCHC 
IJBEC135 
IJEEC145 
IJBEDOLD 
IJEEEDCP 
IJBEEDCR 
IJEEEDCU 
IJBEEDDA 
IJBEEDDl 
IJBEEDES 
IJBEEDIT 
IJBEEDTD 
IJBEEDTP 
IJBEEDTR 
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IJBEEDTl 
IJBEEDUR 
IJBEEDUl 
IJBEEDXl 
IJEEEOB 
IJBEESPT 
IJBEESTR 
IJEEESWK 
IJBEHIST 
IJEEIPL 
IJBEMCAR 
IJEEMCRC 
IJBEMNTR 
IJEEM145 
IJBERDE 
IJBERETV 
IJBESHRT 
IJEESHRLJ 
IJBESMCP 
IJEESMCR 
IJBESMCU 
IJEE3MDA 
IJBESMDl 
IJBESMES 
IJBESMTD 
IJEESMTP 


IJBESMTR 

IJBESMT1 

IJBESMUR 

IJBESMU1 

IJEESPCL 

IJBETES 

IJEETPE1 

IJBEUCCM 

IJEEUNIT 

IJBEUOLD 

IJBE145A 

IJBE145B 

IJBE145C 

IJBE145D 

IJBE2400 

IJBE2715 

IJBE3211 

IJBE333Z 

IJBE3330 

IJBE3410 

IJEE3420 

IJBE3500 

IJEECALA 

IJBECALB 

IJBECALC 

IJBECAID 


Linkage E dit St atem ents 


PHASE EREP,S+80* 
PHASE EREP,+0 
INCLUDE IJBECALA 
// EXEC LNKEDT 

INCLUDE IJBECALB 
// EXEC LNKEDT 

INCLUDE IJBECALC 
// EXEC LNKEDT 

INCLUDE IJBECALD 
// EXEC LNKEDT 

INCLUDE IJBERDE 
// EXEC LNKEDT 


(For a non-multiprogramming system) 
(For a multiprogramming system) 
(Monitor) 

(Edit/Select Retrieval) 

(Summary) 

(Tape Error Statistics) 

(RDE Summary**) 


Choose 

one 


* 80 byte area reserved for tape label processing. This procedure dees 
away with the necessity of including a // LBLTYP card. 

**The summary function will supply meaningful inferiratien only if 
ERRLOG-RBE is specified during system generation. 


Delete Statements 


DELETR IJBEREP,IJBEADPT,IJBEASTA,etc. 
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Glossary 


For a irore complete list of data processing 
terms, refer to I BM Data P ro ce ssi ng 
Techniq ue s, A Data Proces s ing G lo s sa ry, 

GC20-16 99. .. 

A NS I (A me rican National S t andards 

I nsti tu te , Inc.)_ Label Fo rma t: The tape 

file format used when the label is written 
in the ASCII mode. 

A SC II ( Am er ic an National Stan d ar d Cod e fo r 
I nfo rma ti on Int erchange : A 128-character, 
7-bit code. The nigh-order bit in the 
System/360 8-bit environment is zero. 

CCH ( Ch annel Ch eck Handle r); A feature 
that assesses channel errors tc determine 
if the system can continue operations. 

channel i nboard e r ro r; An error that 
occurs between one I/O device and the 
central processing unit. 

chronol og ical a re a of t he r ecorder file; 

The area of the recorder (IJSYSRC) where 
error records are printed as they occur. 

The record types included are MCAR, CCH, 
unit check, IPL/EOD, counter overflow 
records for temporary read/write errors, 
magnetic tape statistics by volume, and 
miscellaneous records. 

D OS Tape Er ror St atis ti cs_(TES2: A 

facility provided by RMSR that monitors and 
records read and write errcrs per volune 
for 2400 and 3400 series tapes. 

data set security: A feature that provides 
protection for disk files. A data secured 
file cannot be accidentally accessed by a 
problem program. 

EREP (Env ironme ntal R ecording, Ed iting, and 
Pr in t ing) : A program that edits and prints 

the data contained on the system recorder 
file. 

E VA (Erro r Vo lume Analysis) : An option 
that causes the system to issue a message 
to the operator when a number cf temporary 
read or write errors (specified by the user 
at system generation time) has been 
exceeded on a currently accessed tape 
volume. 

IDRA (I nd epende nt Directory Rea d- in A rea) : 

A resident area created by a supervisor 
option that the system uses to read core 
image library directories for fetch and 
load operations. Using IDRA frees the 
physical transient area to perform error 
recovery procedures. 


I/C _( input/output) error logging : The 

process cf recording I/C error records on 
the system recorder file. 


jcb a cccunting int er fa ce: A program that 
accumulates accounting information for each 
job step to charge usage of the system, 
help plan new applications, and help 
supervise system operation more 
efficiently. 

LSE RV_( label c y lin d er d isplay) : A program 

that formats a listing of the label 
cylinder located on SYSRES. LSERV can run 
in any partition and outputs the list on 
SYSLST, which may be assigned to disk, 
tape, or printer. 

M CAR (m ac hi ne check analysis and 
r ec ording): A feature that records 

System/370 machine check interrupt error 
information on the system recorder file and 
then attempts to recover from the 
interrupt. 

M CI (ma ch in e c h eck int e rrup t): The 
interrupt that occurs if the central 
processing unit fails to operate. 

P CI L (priva te cor e image libra ry ); A file 
referenced in the same manner and for the 
same purposes as the system core image 
library, but distinct frcm the system core 
image library. PCIL increases available 
cere image library space to enable 
compiling, linkage editing, and executing 
in the foreground partition when a private 
core image library is assigned to that 
partition. 

PEAIE_(Pr ob lem Det ermin ati on A ids) : 

Programs that trace a specified event when 
it occurs during the operation of a 
program. 

prob lem determ i nat ion: A procedure or 
process (provided by IBM) to assist users 
in determining the cause cf a system error. 

SOR TE D DSER V: A program that gives you an 
alphamerically sorted listing of any or all 
of the library directories. 

s ta nd -al o ne du mp: A program that displays 
the contents of main storage from a minimum 
cf 8K bytes to a maximum cf 1,6384K bytes. 
It helps tc determine the cause of an 
error. 

sy stem reco rde r file: The system logical 
unit (SYSREC) that contains RMSR records. 
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General Index by Module 


AB 1 
ADD 1 

adding unique entries using merge function 
1 

ALLOC 1 
allocate 1 

allocating library sizes 1 
ALT 1 

alternate track assignment disk 

core image library 1,31,34 
delete statement 31,34 
linkage edit statements 31,34 
module names 31,34 
modules, number of 1,31,34 
phase names 31,34 
phases, number of 1,31,34 
alternate track assignment 2321 

core image library 1,33,34 
delete statement 33,34 
linkage edit statements 33,34 
module names 33,34 
modules, number of 1,33,34 
phase names 33,34 
phases, number of 1,33,34 
ANS* COBOL 

core image library blocks 1,15 
delete statement 15 
IBM-program number 1,15 
IOCS modules (see compiler IOCS 
modules) 4 

linkage edit statements 15 
module names 15 
modules, number of 1,15 
phase names 15 
phases, number of 1,15 
relocatable library blocks 1,15 
sample program 15 

subroutines and storage requirements 
1,15 

transients 15 
workfiles (IBM 2311) 15 

workfiles (IBM 2314) 15 

AP 1 
ASCII 1 
assembler D 

core image library blocks 1,12 
delete statement 12 
diagnostics 12 

disk non-macro assembly workfile needs 
12 

IBM program number 1,12 
linkage edit statements 12 
macro instruction workfile 
requirements 12 
module names 12 
modules, number of 1,12 
phase names 12 
phases, number of 1,12 


assembler D (CONT.) 


relocatable library blocks 1,12 
warning diagnostics 12 
workfiles 12 
assembler F 

core image library blocks 1,13 
delete statement 13 
IBM program number 1,13 
linkage edit statements 13 
macro instruction workfile 
requirements 13 
module names 13 
modules, number of 1,13 
phase names 13 
phases, number of 1,13 
relocatable library blocks 1,13 
sample problems 14 
workfiles 13 
assembler 

sample problem 14 
sample problems file requirements 
14 

ASSGN 


macro 1 
statement 1 
AS1 sample problem 14 

AS2 sample problem 14 

AS3 sample problem 14 

AS4 sample problem 14 

AS5 sample problem 14 

AS6 sample problem 14 


1 , 


background partitions storage requirements 
for DOS 1 

back-up tape, creation of 1 
back-up tape, restoring 1 
basic FORTRAN 

core image library blocks 1,19 
delete statement 19 
IBM program number 1,19 
linkage edit statements 19 
module names 19 
modules, number of 1,19 
phase names 19 
phases, number of 1,19 
relocatable library blocks 1,19 
sample problem 19 

subroutines and storage requirement 
1,19 

workfiles (2311) 19 

workfiles (2314) 19 

basic QTAM logic modules 29 
BGPGR 1 
BMPX 1 

BPS messages 1 

BPS utility program 1 

BPS job control coding specifications 1 
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BTAM 


BSC table of special characters 28 
channel program modules (for 
start-stop) 28 

channel program modules for BSC 28 
core image library blocks 1,28 
data event control block 28 
delete statement 28 
IBM program number 1,28 
library book (macro) names 28 
library books (macro), number of 1,28 
module names 28 
modules, number of 1,28 
on-line terminal test pattern phase 
ident. 28 

on-line terminal test patterns, phases 
28 

on-line terminal test patterns, 
transients 28 
phase names 28 
phases, number of 1,28 
relocatable library blocks 28 
source statement library blocks 1,28 
transient routines 28 

translation tables 28 

WTTA subroutine 28 
BTMOD (BTAM logic module), size of 28 
bypass initialize disk 1 

card to disk 

delete statement 31,34 
linkage edit statements 31,34 
module names 31,34 
modules, number of 1,31,34 
number library blocks, core image 1, 
31,34 

phase names 31,34 
phases, number of 1,31,34 
card to printer and/or punch 

core image library blocks 1,31 
delete statement 31 
linkage edit statements 31 
module names 31 
modules, number of 1,31 
phase names 31 
phases, number of 1,31 
card to tape 

core image library blocks 1,32 
delete statement 32 
linkage edit statements 32 
module names 32 
modules, number of 1,32 
phase names 32 
phases, number of 1,32 
CBF 1 
CCHAIN 1 
CDMOD 1 
CDMOD 

(card module names for compilers) 4 
main storage requirements 1 
channel inboard and machine check recorder 
1 

CHANQ 1 
CHANSW 1 
CHARSET 1 
CHUN 1 


clear data cell 

core image library blocks 1,33,34 
delete statement 33,34 
linkage edit statements 33,34 
module names 33 
modules, number of 1,33,34 
phase names 33,34 
phases, number of 1,33,34 
clear disk 

core image library blocks 1,31,34 
delete statement 31,34 
linkage edit statements 31,34 
module names 31,34 
modules, number of 1,31,34 
phase names 31,34 
phases, number of 1,31,34 
sample problem 34 
CLOCK 1 
CNLSVE label 1 
COBOL debug 

core image library blocks 1,16 
linkage edit statements 16 
module names 16 
modules, number of 1,16 
phase names 16 
phases, number of 1,16 
relocatable library blocks 1,16 
COBOL LCP 

core image library blocks 1,18 
delete statement 18 
IBM program number 1,18 
linkage edit statements 18 
module names 18 
modules, number of 1,18 
phase names 18 
phases, number of 1,18 
relocatable library blocks 1,18 
sample problem 18 
workfiles (IBM 2311) 18 

workfiles (IBM 2314) 18 

COBOL 

core image library blocks 1,16 
DASD macros, source statement library 
17 

delete statement 16 
IBM program number 1,16 
IOCS modules (see compiler IOCS 
modules) 

linkage edit statements 16 
module names 16 
modules, number of 1,16 
phase names 16 
phases, number of 1,16 
relocatable library blocks 1,16 
sample problem 16 

source statement library blocks 1,16 
subroutines and storage requirement 
1,16 

transients 1,16 
workfiles (IBM 2311) 16 

workfiles (IBM 2314) 16 

common librarian modules 1 
compiler IOCS modules 4 
component identification 

core image library 1 
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component identification (CONT.) 
relocatable library 1 
source statement library 1 
components shipped with transients 1 
computing the size of a supervisor 1 
CONFG macro 1 
console buffering 1 
copy and restore 1 
copy disk or 2321 to tape 

core image library blocks 1,32,34 
delete statement 32,34 
linkage edit statements 32,34 
module names 32,34 
modules, number of 1,32,34 
phase names 32,34 
phases, number of 1,32,34 
copy disk to card 

core image library blocks 1,31,34 
delete statement 31,34 
linkage edit statements 31,34 
module names 31,34 
modules, number of 1,31,34 
phase names 31,34 
phases, number of 1,31,34 
copy disk to disk 

core image library blocks 1,31,34 
delete statement 31,34 
linkage edit statements 31,34 
module names 31,34 
modules, number of 1,31,34 
phase names 31,34 
phases, number of 1,31,34 
copy disk-to-tape or card (BPS utility) 1 
copy system disk to tape 1 
copying selectively to merge libraries 1 
core image library 

ANS* COBOL 15 

assembler (F) 13 

assembler D 12 

COBOL 16 

COBOL debug 16 

COBOL LCP 18 

components 1 

CORGZ 1 

CSERV 1 

directory 1 

DSERV 1 

DUMPGEN 1 

EREP 1 

ESTVUT 1 

FORTRAN IV 20 

FORTRAN, basic 19 

IBM 3211 printer support 1 

IBM-supplied 1 

IPL 1 

job control 1 
linkage editor 1 
MAINT 1 
MCAR/CCH 1 
OLTEP 27 
PDAIDS 1 
PL/I (D) 22 

RPG 23 
RSERV 1 

sort, disk sort/merge 24 

sort, tape and disk sort/merge 25 


sort, tape sort/merge 26 
SSERV 1 

standard system dump 1 
supervisor nucleus, 14K 1 

T/P, BTAM 28 

T/P, QTAM 29 

transients (see transients) 
translating system dump 1 
utilities-group 1 31 

utilities-group 2 32 

utilities-group 3 33 

utilities (system) 34 

CORGZ 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 
phase names 1 
phases, number of 1 

creating a back-up of your generated 
system volume 1 

creating a third library from existing 
libraries 1 
CSERV 

core image library blocks 1 
linkage edit statements 1 
phase names 1 
phases, number of 1 

D2311 1 

D2314 1 

D2321 1 

D3330 1 

D2400 1 

D3410 1 

D3420 1 

DAMOD 

(direct access module names for 
compilers) 4 

main storage requirements 5 
DASDFP 1 

data cell to data cell 

core image library blocks 1,33 
delete statement 33 
linkage edit statements 33 
module names 33 
modules, number of 1,33 
phase names 33 
phases, number of 1,33 
data cell to disk 

core image library blocks 1,33 
delete statement 33 

linkage edit statements 33 
module names 33 
modules, number of 1,33 
phase names 33 
phases, number of 1,33 
data cell to printer 

core image library blocks 1,33 
delete statement 33 

linkage edit statements 33 
module names 33 
modules, number of 1,33 
phase names 33 
phases, number of 1,33 
sample problem 33 
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data cell to tape 

core image library blocks 1,32 
delete statement 32 
linkage edit statements 32 
module names 32 
modules, number of 1,32 
phase names 32 
phases, number of 1,32 
DATE 1 
DEC 1 

decisions and considerations 1 

DECK 1 

DELETECL 1 

DELETERL 1 

DELETESL 1 

deleting entries and merging libraries 1 
device I/O modules requirements (QTAM) 29 
DFTRMLST (define the terminal list BTAM) 

28 

DFTRMLST (table requirements, BTAM) 
AUTOLST/AUTOWLST 28 
DIALST 28 
IDLST 28 
OPENLST 28 
SSLAST/SSAWLST 28 

WRAPLST 28 
WTTALST 28 
diagnostics 12 
DIMOD 1 
DIMOD 

(device independent module names for 
compilers) 4 

main storage requirements 1 
directory capacities, system 1 
DISK 1 
disk sort/merge 

core image library blocks 1,24 
delete statement 24 
IBM program number 1,24 
linkage edit statements 24 
module names 24 
modules, number of 1,24 
phase names 24 
phases, number of 1,24 
relocatable library blocks 1,24 
sample problem 24 
disk to card 

core image library blocks 1,31,34 
delete statement 31,34 
linkage edit statements 31,34 
module names 31,34 
modules, number of 1,31,34 
phase names 31,34 
phases, number of 1,31,34 
disk to data cell 

core image library blocks 1,33 
delete statement 33 
linkage edit statements 33 
module names 33 
modules, number of 1,33 
phase names 33 
phases, number of 1,33 
disk to disk 

core image library blocks 1,31,34 
delete statement 31,34 
linkage edit statements 31,34 
module names 31,34 


modules, number of 1,31,34 
phase names 31,34 
phases, number of 1,31,34 
disk to printer 

core image library blocks 1,31 
delete statement 31 
linkage edit statements 31 
module names 31 
modules, number of 1,31 
phase names 31 
phases, number of 1,31 
sample problems 31 
disk to tape 

core image library blocks 1,32 
delete statement 32 
linkage edit statements 32 
module names 32 
modules, number of 1,32 
phase names 32 
phases, number of 1,32 
disk work files 

assembler D 12 
modules 4 

distributed volumes 1 
distribution program 1 

distribution program (BPS) messages 1 
distribution program and BPS job control 
coding specifications 1 
DSERV 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 
phase names 1 
phases, number of 1 

DTFBT (define the file BTAM), size of table 
28 

DTFBTND (define the file end BTAM), size of 
table 28 

DTFCD (define the file card), size of table 
1 

DTFCN (define the file console) 1 
DTFDA (define the file direct access 
device) 5 

DTFDI (define the file device independent) 
system units 1 

DTFIS (define the file indexed sequential) 

6 

DTFMR (define the file - magnetic character 
reader) 7 

DTFMT (define the file magnetic tape), size 
of table 8 

DTFOR (define the file optical reader), 
size of table 9 

DTFPH (define the file physical IOCS), size 
of table 1 

DTFPR (define the file printer), size of 
table 1 

DTFPT (define the file paper tape) 10 
DTFQT 

(define the file QTAM), size of tables 
29 

audio output queue table requirements 
(QTAM) 29 

checkpoint records table requirements 
29 

comm, line group file table 
requirements 29 
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IBM 7772 voc. file table requirements 
29 

main storage destination queue, table 
req. 29 ■ 

main storage process queue table 
requirement 29 

message queues files table req. QTAM 
29 

DTFSD 

(define the file sequential DASD), 
size of table 11 
main storage requirements 11 
DTFSR (define the file serial device), size 
of table 1 
DUMP 1 
DUMPGEN 

core image library blocks 1 
linkage edit statements 1 
modules 1 

modules, number of 1 
phases 1 

phases, number of 1 
relocatable library blocks 1 
DVCGEN macro 1 
DVCTYP 1 
DWF 14 


emulator 1 
emulator 

linkage edit statements, 2,3 
sample problems, 2,3 
emulators 

module names 2,3 

module sizes 2,3 

modules, number of 2,3 
end of supervisor macro instruction, SEND 
1 

environmental recording, editing, and 
printing program (see EREP) 

EREP 

core image library blocks 1,35 
linkage edit statements 1,35 
module names 1,35 
modules, number of 1,35 
phase names 1,35 
phases, number of 1,35 
recorder file 1,35 
ERRLOG 1 

error statistics by tape volume 
(see ESTVUT) 

ERRS 1 
ESTVUT 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 
phase names 1 
phases, number of 1 
recorder file 1 
EU (parameter) 1 
EVA (parameter) 1 
examples 

MERGE 1 

MERGE job stream 1 
MNOTE resolutions 1 
supervisor 1 

system generation using one disk 1 


system generation using two disks 1 
system generation using volume 3 1 

system generation using 2314 1 

system generation using 3330 1 

EXIT 1 

file names and logical unit ident. for 
merge 1 
FOPT macro 1 
foreground save areas 1 
FORTRAN IV 

core image library blocks 1,20 
delete statement 20 
IBM program number 1,20,21 
linkage edit statements 20 
module names 20 
modules, number of 1,20 
phase names 20 
phases, number of 1,20 
relocatable library blocks 1,20 
sample problem 20 

subroutines and storage requirement 

1,21 

workfiles (IBM 2311) 20 

workfiles (IBM 2314) 20 

FORTRAN 

basic (see basic FORTRAN) 
compatibility 19,20,21 
FP 1 
F1PGR 1 
F2PGR 1 


general library updating techniques 1 
general system generation procedures 1 
generated system volume, creating a 
back-up of 1 

I/O configuration, sysgen examples 
(2314) 1 

(3330) 1 

one disk 1 

two disk 1 

IBM supplied 

core image library 1 
relocatable library 1 
source statement library 1 
IBM DOS distribution 1 
IBM 2311 workfile requirements 1 

IBM 2314 workfile requirements 1 

IBM 3211 printer support 1 
initialize and restore programs 
bypass initialize disk 1 
initialize disk 1 
rest. IBM tape to disk 
initialize data cell 

core image library blocks 1,33,34 
delete statement 33,34 
linkage edit statements 33,34 
module names 33,34 
phase names 33,34 
phases, number of 1,33,34 
initialize disk (BPS) messages 1 
initialize disk 

core image library blocks 1,31,34 
delete statement 31,34 
linkage edit statements 31,34 
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module names 31,34 
phase names 31,34 
phases, number of 1,31,34 
sample problem 34 
initialize tape 

core image library blocks 1,32,34 
delete statement 32,34 
linkage edit statements 32,34 
module names 32,34 
phase names 32,34 
phases, number of 1,32,34 
IOCS module sizes 

BTAM (BSC) 28 


LIST 1 
listings 1 
LISTX 1 
LOG 1 


machine requirements 1 
macro work file needs 
assembler D 12 

assembler F 13 

macro 

instructions for generating 
supervisor 1 


BTAM (start-stop) 

28 

macros, IBM 

-supplied 

BTAM (trans tables) 

28 

ALLOC 

1 

compilers 4 


ANUM 

2,3 

disk work files 4 


ARUMGTYP 29 

IOCS 


AS 28 

messages, (distr. progr. and BPS) 

ASLIST 

28 

hardware errors 

1 

ASMTRTAB 28 

modules, compilers 

4 

ASSGN 

1,1 

modules, tape work 

files 4 

AS1 

12 

IODEV 1 


AS 2 

12 

IOTAB macro 1 


AS3 

12 

IPL 


AS 4 

12 

core image library 

blocks 1 

AS5 

12 

linkage edit statements 1 

AS6 

12 

module names 1 


ATTACH 

1 

modules, number of 

1 

BDIL 

2,3 

phase names 1 


BIFLAG 

2,3 

phases, number of 

1 

BREAKOFF 29 

reason codes 1 


BTMOD 

28 

ISMOD 4,6 


BTRD 

28 

ISMOD 


BTRWC 

28 

(indexed sequential 

module names for 

BTWAIT 

28 

compilers) 4 


BUFARU 

29 

main storage requirements 6 

BUFFER 

29 

IT (parameter) 1 


CALL 

1 



CANCEL 

1 



CANCELM 29 

JIB (job information block) 1 

CBl 

16 

job accounting interface 

1 

CB2 

15 

job control 


CCB 

1 

core image library 

blocks 1 

CDMOD 

1,4 

linkage edit statements 1 

CHECK 

1 

messages (BPS) 1 


CHECKARU 29 

module names 1 


CHGNTRY 28 

modules, number of 

1 

CHKPT 

1 

phase names 1 


CHNG 

1 

phases, number of 

1 

CHNGP 

29 



CHNGT 

29 



CKREQ 

29 

Kanji printer 1 


CLOSE 

1 



CLOSEMC 29 



CLOSER 

1 

librarian programs 1 


CNTRL 

1 

library block size 1 


COMMN 

1 

library sizes 1 


COMMNEX 1 

LINES 1 


COMP 

2,3 

linkage editing or deleting IBM components 

COMRG 

1 

1 


CONFG 

1 

linkage editor 


CONFIGUR 28 

core image library 

blocks 1 

CONTROL 28 

linkage edit statements 1 

COPYC 

29 

module names 1 


COPYP 

29 

modules, number of 

1 

COPYQ 

29 

phase names 1 


COPYT 

29 

phases, number of 

1 

COUNTER 29 


a 
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macros, IBM-supplied (CONT.) 

ENDFL 6 

CTLTBL 29 

ENDRCV 29 

CTRGROUP 28 

ENDREADY 29 

CTRLIST 28 

ENDSEND 29 

CTRSCHED 28 

ENQ 1 

DAMOD 4,5 

EOA 29 

DAMODV 5 

EOB 29 

DATESTMP 29 

EOBLC 29 

DBIB 2,3 

EOJ 1 

DDTF 2,3 

ERET 1 

DDUB 2,3 

ERRMSG 29 

DECCB 3 

ESETL 6 

DELETECL 1 

EXCP 1 

DELETERL 1 

EXIT 1 

DELETESL 1 

FEOV 1 

DEQ 1 

FEOVD 1 

DETACH 1 

FETCH 1 

DEULIST 28 

FOPT 1 

DFTMRLST 2 8 

FREE 1 

DIIQCR 2 

FOI 19 

DIIRCR 3 

GDUAS 28 

DIL 2,3 

GDULIST 28 

DIMOD 1,4 

GDUTRANS 28 

DIRECT 29 

GET 1 

DISEN 7 

GETIME 1 

DISPGUID 28 

IIQBR 2 

DLCP12 18 

IIQCR 2 

DOSCHLV 1 

IIQDS 2 

DSPLY 9 

IIQEI 2 

DSUB 2,3 

IIQID 2 

DTFBG 1 

IIQIU 2 

DTFBT 28 

IIQOJ 2 

DTFBTND 28 

IIQUR 2 

DTFCD 1 

IIRCR 3 

DTFCN 1 

IIRDCC 3 

DTFDA 5 

IIREI 3 

DTFDI 1 

IIRID 3 

DTFEN 1 

IIRIU 3 

DTFIS 6 

IIROJ 3 

DTFIS1 6 

IJKZL 22 

DTFIS2 6 

IJLBTMDS 28 

DTFIS3 6 

IJLQBABD 29 

DTFMR 7 

IJLQBFRD 1,29 

DTFMT 8 

IJLQBRBD 29 

DTFOR 9 

IJLQCKPD 29 

DTFPH 1 

IJLQCTLD 29 

DTFPR 1 

IJLQDEQU 29 

DTFPT 10 

IJLQDSCT 1,29 

DTFQT 29 

IJLQDTFD 29 

DTFSD 11 

IJLQIPlD 1,29 

DTFSR 1 

IJLQLABD 29 

DUMP 1 

IJLQLCBD 29 

DVCGEN 1 

IJLQMCBD 29 

EMCNSL 2,3 

IJLQOBRD 29 

EMDISK 2,3 

IJLQQCBD 1,29 

EMEND 2,3 

IJLQSTBD 1,29 

EMPNCH 2,3 

IJLOSVCD 29 

EMPTR 2,3 

IJLQTBLD 29 

EMRDR 2,3 

IJLQTSVC 1,29 

EMSPLO1 2 

IJLQVECD 1,29 

EMSP01S 2 

ILFMERGE 20 

EMSPL10 3 

ILFSAMPL 20 

EMSPL10S 3 

INCARD 30 

EMSUP 2,3 

INDISK 30 

EMTAPE 2,3 

INLOG 30 

EMULATOR 2,3 

INTAPE 30 

EMVERIFY 2,3 

INTCR 30 

General Index by Module 413 



ros, IBM-supplied (CONT.) 

POSTARU 29 

INTERCPT 29 

POSTRCV 29 

IOTAB 1 

POSTSEND 29 

ISMOD 4,6 

PREFIXD 29 

ISMODO 6 

PRMOD 1,4 

ISMOD1 6 

PROCESS 29 

ISMOD2 6 

PRTOV 1 

ISMOD3 6 

PTMOD 10 

ISMOD4 6 

PUT 1 

ISMOD5 6 

QCBD 29 

ISMOD6 6 

RANDA 17 

ISMOD7 6 

RCB 1 

ISMOD8 6 

RCVHDR 29 

ISMOD9 6 

RCVITA2 29 

LBRET 1 

RCVSEG 29 

LCBD 29 

RCVZSC3 29 

LERB 28 

RDLNE 9 

LERPRT 28 

READ 1 

LINE 29 

RELBUF 28 

LINETBL 29 

RELEASE 1 

LINKEDIT 1 

RELEASEM 29 

LIST 29 

RELSE 1 

LITE 7 

REPEAT 29 

LOAD 1,17 

REROUTE 29 

LODIS 17 

RESCN 9 

LOGSEG 29 

RESETPL 28 

LOPEN 2 8 

RETRIEVE 29 

LP START 29 

RETURN 1 

LUBGEN 1 

RG1 23 

MAPLOWC 1 

RMSRTAB 28 

MAPPUB2 1 

ROUTE 29 

MCPU 2,3 

RRUIS 17 

MCRAS 1 

RUADA 17 

MCR1 7 

RUAIS 17 

MCR2 7 

SAVE 1 

MIO 2,3 

SCANREQ 28 

MODE 29 

SDMOD 4, 11 

MRMOD 7 

SDMOD 4,11 

MSGTYPE 29 

SDMODFI 11 

MTMOD 4,8 

SDMODFO 11 

MVCOM 1 

SDMODFU 1 

NOTE 1 

SDMODUI 11 

ONLTST 28 

SDMODUO 11 

OPCTL 29 

SDMODUU 11 

OPEN 1 

SDMPDVI 11 

OPENR 1 

SDMODVO 11 

OPTION 29 

SDMODVU 11 

ORDC 9 

SDMODW 11 

ORJT 9 

SDRTAB 28 

ORMOD 9 

SEND 1 

OUTAPE 30 

SENDHDR 29 

OUTCARD 30 

SENDSEG 29 

OUTDISK 30 

SEOV 1 

OUTLOG 30 

SEQDA 17 

OUTPRT 30 

SEQIN 29 

PARAMNUM 28 

SEQOUT 29 

PRAMLIST 28 

SETFL 6 

PAUSE 29 

SETIME 1 

PDUMP 1 

SETL 6 

PIOCS 1 

SGDFCH 1 

PL1 22 

SGDSK 1 

POINTR 1 

SGSVC 1 

POINTS 1 

SGTCHS 1 

POINTW 1 

SGTCON 1 

POLL 29 

SGTHAP 1 

POLLIMIT 29 

SGUNCK 1 

POST 1 

SKIP 29 
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macros, IBM-supplied (CONT.) 


SMICR 

SMI 26 

SM2 24 

SM4 25 

1,1 

SM5 25 
SM6 25 
SNDITA2 

29 

SNDZSC3 

29 

SORTAB 

28 

SOURCE 

29 

SRUIS 

17 

STARTARU 

29 

STARTLN 

29 

STCBD 

29 

STDJC 

1 

STEND 

28 

STOPARU 

29 

STOPLN 

29 

STXIT 

1 

SUPVR 
TECB 1 

1 

TERM 29 

TERMTBL 

29 

TERMTBLD 

29 

TGROUP 

28 

TIMESTMP 

29 

TPEDIT 

28 

TRANS 

29 

TRLIST 

28 

TRNSLATE 

: 28 

TRSRCTW 

28 

TRSRCT3 

28 

TRSSCTW 

28 

TRSSCT3 

28 

TRTAB 

1 

TRUNC 

1 

TWAIT 

28 

UTDCPRl 

33 

UTDKPRl 

31 

UTDKPR2 

31 

UTDKPR3 

31 

UTTPPRl 

32 

UTTPPR2 

32 

WAIT 1 

WAITF 

1 

WAITM 

1 

WORD 29 

WORDTBL 

29 

WRITE 

1 

WRU 29 


magnetic character reader sample problems 
7 

magnetic tape IOCS modules 4 
main storage needs, compiler subroutines 
ANS* COBOL 15 
basic FORTRAN 19 
COBOL 16 
FORTRAN IV 21 
PL/I (D) 22 

main storage requirements for elements of 
supervisor 1 
MAINT 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 


phase names 1 
phases, number of 1 
maintenance examples using merge function 
1 

maintenance macro, source statement library 
(FORTRAN) 20 
maintenance procedures 1 
MAPS 1 

maximum unprotected supervisor storage 1 
MCAR/CCH 1 
merge examples 

conventions for 1 
MERGE function, use of 1 
messages, distribution program 1 
MICR 1 

MNOTEs during supervisor assembly 1 
MODE 1 
MODEL 1 
MPS 1 

MPS utility macro storage requirements 1 
MRMOD (magnetic character reader module) 

9 

MTMOD (magnetic tape module) 4,8 
multiprogramming examples 30 
multitasking 1 


OC parameter 1 
OLTEP 

core image library blocks 1,27 
delete statement 27 
IBM program number 1,27 
linkage edit statements 27 
module names 27 
modules, number of 1,27 
phase names 27 
phases, number of 1,27 
relocatable library blocks 1,27 
transients 27 
one 2311 disk drive users 
planning 1 

system generation procedure 1 
operational pack 

organization 1 
planning 1 

optical reader sample problems 9 
optimum assignment of work files 
assembly and link 1 
compile and link 1 
optimum assignment of workfiles 1 

organization of the system '-pack 1 

ORMOD (optical reader module), size of 9 


parameters 

ALLOC 1 
ASSGN 1 
CONFG 1 

DTFBT table requirements formula 28 
DVCGEN 1 

FOPT 1 
IOTAB 1 
PIOCS 1 
SEND 1 
STDJC 1 
SUPVR 1 
PC 1 
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PD 1 
PDAID 

core image library blocks 1 
linkage edit statements 1 
modules 1 

modules, number of 1 
phases 1 

phases, number of 1 
relocatable library blocks 1 
transient 1 
transients, number of 1 
physical and logical I/O assignments, 
sample problems 1 
physical transient overlays 1 
PIOCS 1 
PIOCS 

macro 1 
parameters 1 

PL/I (D) and systems input/output on disk 
22 

PL/I (D) 

core image library blocks 1,22 
DASD macro, source statement library 
17 

delete statement 22 

IBM program number 1,22 

IOCS modules 4 

linkage edit statements 22 

macro names 22 

module names 22 

modules, number of 1,22 

number library books 1,22 

phase names 22 

phases, number of 1,22 

sample problem 22 

source statement library blocks 1,22 
subroutines and storage requirement 
1,22 

transients 1,22 
variants 22 
workfiles (IBM 2311) 22 

workfiles (IBM 2314) 22 

planning 

libraries (operational pack) 1 
supervisor 1 
system generation 1 
PORT 1 

printer support, IBM 3211 1 

private libraries 1 
PRMOD (printer module) 1,4 
problem determination 

IBM-supplied list for DOS 1 
processing the distribution tape 1 
PTMOD (paper tape module) 10 
PTO 1 


QTAM 

basic logic modules and storage 
requirements 29 
buffer requirements, audio 
applications 29 
buffer requirements, nonaudio 
applications 29 
control information storage 
requirements 29 


QTAM (CONT.) 

core image library blocks (transients) 
1,29 

delete statements 29 
device I/O modules and storage 
requirements 29 
IBM program number 1,29 
library book (macro) names 29 
library book (macro) number of 1,29 

macro instructions storage 
requirements 29 
module names 29 
modules, number of 1,29 
relocatable library blocks 1,29 
source statement library blocks 1,29 
transient routines 29 


RDE (reliability data extractor) 1 
reason codes (IPL) 1 
recorder file 1 
recorder file 
EREP 1 

reliability data extractor (RDE) 1 
relocatable library 
ANS* COBOL 15 
ANS* COBOL subroutines 15 
assembler (D) 12 

assembler F 13 
BTAM 28 
COBOL 16 
COBOL debug 16 
COBOL LCP 18 
COBOL subroutines 16 
common librarian modules 1 
compiler IOCS modules 4 
CORGZ 1 
CSERV 1 

disk sort/merge 24 
DSERV 1 
DUMPGEN 1 

emulator modules, library blocks 2,3 
emulator, IBM model 155 2,3 

EREP 1 
ESTVUT 1 

FORTRAN (basic) 19 

FORTRAN IV 20 

FORTRAN IV subroutines 21 

FORTRAN subroutines (basic) 19 

IBM 3211 printer support 1 

IBM-supplied 1 

IPL 1 

job control 1 

linkage editor 1 

MAINT 1 

MCAR/CCH 1 

module ID 1 

OLTEP 27 

PDAID 1 

PL/I (D) 22 

PL/I (D) subroutines 22 

QTAM 29 

RPG 23 

RSERV 1 

SSERV 1 

standard system dump 1 
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1 


RELOCATABLE LIBRARY (CONT.) 

tape and disk sort/merge 25 
tape sort/merge 26 
translating system dump 1 
utilities-group 1 31 

utilities-group 2 32 

utilities-group 3 33 

utilities (system) 34 

relocatable subroutines, size of 
ANS* COBOL 15 
COBOL 16 

FORTRAN (basic) 19 
FORTRAN IV 21 
PL/I (D) 22 

replacing identical entries using merge 
function 1 

required IOCS modules 4 
restore back-up tape to disk 1 . 

restore card or tape to disk (BPS utility) 
1 

restore card to disk 

core image library blocks 1,31 
delete statement 31 
linkage edit statements 31 
messages (BPS utility) 1 
module names 31 
modules, number of 1,31 
phase names 31 
phases, number of 1,31 
restore system tape to disk 1 
restore tape to disk or data cell 

core image library blocks 1,32 
delete statement 32 
linkage editor statements 1 
module names 32 
modules, number of 1,32 
phase names 32 
phases, number of 1,32 
RETAIN 1 

retrieving the sample problems 1 

RMSR (ERRLOG) 1 

RPG 

core image library blocks 1,23 
delete statement 23 
IBM program number 1,23 
IOCS modules (see compiler IOCS 
modules) 4 

linkage edit statements 23 
module names 23 
modules, number of 1,23 
phase names 23 
phases, number of 1,23 
relocatable library blocks 1,23 
sample problem 23 
workfiles (IBM 2311) 23 

workfiles (IBM 2314) 23 

RSERV 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 
phase names 1 
phases, number of 1 

rules 

DVCGEN 1 
macros 1 


supervisor generation macros 
RWTAU 1 


sample problem 

as successive job steps -1 
library blocks 1 
preparation 1 
work files 1 
SDMOD (sequential DASD modules) 4,11 
SDMODW 4 
SDMODXX 4 
SELCH 1 
SEND macro 1 
SET 1 
SETIME 1 

size of supervisors 1 

SKSEP 1 

sort/merge 

disk 1,24 
tape 1,26 
tape and disk 1,25 
source statement library 1 
source statement library macros 
BTAM macros 28 
COBOL DASD 17 
components of 1 
MPS utility 34 
PL/I DASD 17 
QTAM 29 

supervisor generation 1,7,29 
supervisor communication 1 
system generation 1 
source statement library 
IBM supplied 1 

SSERV 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 
phase names 1 
phases, number of 1 
standard label option 1 
standard system dump 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 
phase names 1 
phases, number of 1 
STDJC 1 
STXIT 1 

subroutines, relocatable 
ANS* COBOL 15 
COBOL 16 

FORTRAN (basic) 19 
FORTRAN IV 21 
PL/I (D) 22 

supervisor 1 

supervisor shipped by IBM 1 
supervisor 

communication macro, blocks 1 
communication macro, books 1 

communication macro, names 1 

core image library blocks (IBM 
supplied) 1 

IBM program number (14K) 1 
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SUPERVISOR (CONT.) 

macro, generation, blocks 1 
macro, generation, books 1 

macro, generation, names 1 

macro, instructions 1 
macro, instructions storage 
requirements 1 

macros, source statement library 1 
main storage requirements 1 
messages (BPS) 1 
phase names 1 
phases, number of (14K) 1 

planning 1 
SUPVR macro 1 
switchable channels 1 
SYM 1 
SYSFIL 1 

SYSGEN IPL control and assign statements 
1 

system configuration 1 
system control 

core image library blocks 1 
IBM program number 1 
module names 1 
modules, number of 1 
phase names 1 
phases, number of 1 
relocatable library blocks 1 
transients 1 

system directory and library track 
capacities 1 
system distribution 

disk only users (2311) 1 

disk only users (2314) 1 

tape users (2311) 1 

tape users (2314) 1 

tape users (3330) 1 

system generation and maintenance procedure 
1 

system I/O modules MTMOD 4 
system libraries 

directory capacities 1 
track capacities 1 
system utility program 34 


table requirements 
DTFCD 1 
DTFCN 1 
DTFDA 7 
DTFDI 1 
DTFIS 6 
DTFMR 7 
DTFMT 8 
DTFOR 9 
DTFPH 1 
DTFPR 1 
DTFPT 10 
DTFSD 11 
DTFSR 1 

TAPE 1 

tape and disk sort/merge 

core image library blocks 1,25 
delete statement 25 
IBM program number 1,25 
linkage edit statements 25 
module names 25 


modules, number of 1,25 
phase names 25 
phases, number of 1,25 
relocatable library blocks 1,25 

2311 sample problem 25 

2314 sample problem 25 

2400 sample problem 25 

tape compare 

core image library blocks 1,32 
delete statements 32 
linkage edit statements 32 
module names 32 
modules, number of 1,32 
phase names 32 
phases, number of 1,32 
tape sort/merge sample problem 26 
tape sort/merge 

core image library blocks 1,26 
delete statement 26 
IBM program number 1,26 
linkage edit statements 26 
module names 26 
modules, number of 1,26 
phase names 26 
phases, number of 1,26 
relocatable library blocks 1,26 
sample problem 26 
tape to card 

core image library blocks 1,32 
delete statement 32 
linkage edit statements 32 
module names 32 
modules, number of 1,32 
phase names 32 
phases, number of 1,32 
tape to data cell 

core image library blocks 1,32,34 
delete statement 32,34 
linkage edit statements 32,34 
module names 32,34 
modules, number of 1,32,34 
phase names 32,34 
phases, number of 1,32,34 
tape to disk 

core image library blocks 1,32,34 
delete statement 32,34 
linkage edit statements 32,34 
module names 32,34 
modules, number of 1,32,34 
phase names 32,34 
phases, number of 1,32,34 
tape to printer sample problems 32 
tape to printer 

core image library blocks 1,32 
delete statement 32 
linkage edit statements 32 
module names 32 
modules, number of 1,32 
phase names 32 
phases, number of 1,32 
tape to tape 

core image library blocks 1,32 
delete statement 32 
linkage edit statements 32 
module names 32 
modules, number of 1,32 
phase names 32 
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tape to tape (CONT.) 

phases, number of 1,32 
tape workfiles 

assembler (D) 12 

modules 4 

tape, disk, and data cell configurati 
1 

TEB 1 

TEBV 1 

teleprocessing 

(see BTAM or QTAM) 

time-of-day (TOD) clock support 1 
TOD 1 
TP 1 

transients, IBM-supplied 


$$ANERAA 

1 

$$ANERAB 

1 

$$ANERAC 

1 

$$ANERAD 

1 

$$ANERAE 

1 

$$ANERAF 

1 

$$ANERAG 

1 

$$ANERAH 

28 

$$ANERAI 

10 

$$ANERAJ 

10 

$$ANERAM 

1 

$$ANERAN 

1 

$$ANERAT 

1 

$$ANERAU 

1 

$$ANERAV 

1 

$ $ANERP1 

28 

$$ANERP2 

28 

$$ANERP3 

28 

$$ANERP4 

28 

$$ANERP5 

28 

$$ANERP6 

28 

$$ANERP7 

28 

$$ANERP8 

28 

$ $ANERR 

1 

$$ANERRA 

1 

$$ANERRB 


$$ANERRC 

1 

$$ANERRD 

1 

$$ANERRE 

1 

$$ANERRF 

1 

$$ANERRG 

1 

$$ANERRH 

1 

$$ANERRI 

1 

$$ANERRJ 

1 

$$ANERRK 

1 

$$ANERRL 

1 

$$ANERRM 

1 

$$ANERRN 

1 

$$ANERRO 

1 

$ $ANERRP- 

1 

$$ANERRQ 

1 

$$ANERRR 

1 

$$ANERRS 

1 

$$ANERRT 

7 

$$ANERRU 

1 

$ $ANERRV 

1 

$$ANERRW 

7 

$ $ANERRX 

10 

$$ANERRY 

1 

$ $ANERRZ 

1 

$$ANERR0 

1 

$$ANERR1 

1 


transients, IBM-supplied (CONT.) 


$$ANERR2 

28 

$$ANERR3 

28 

$$ANERR4 

28 

$$ANERR5 

28 

$$ANERR6 

1 

$$ANERR7 

1 

$$ANERR8 

1 

$$ANERR9 

9 

$ $ANERSA 

1 

$$ANERSB 

1 

$$ANERSC 

1 

$$ANERSD 

1 

$$ANERSE 

1 

$$A$SUPl 

1 

$$BATTNA 

1 

$$BATTNB 

1 

$$BATTNC 

1 

$$BATTND 

1 

$$BATTNE 

1 

$$BATTNF 

1 

$$BATTNG 

1 

$$BATTNH 

1 

$$BATTNI 

1 

$$BATTNJ 

1 

$$BATTNK 

1 

$$BATTNL 

1 

$$BATTNM 

1 

$$BATTNN 

1 

$$BATTNO 

1 

$$BATTNP 

1 

$$BATTNQ 

1 

$ $BATTNR 

1 

$$BATTNS 

1 

$$BATTNT 

1 

$$BATTNU 

1 

$$BATTNV 

1 

$$BATTNX 

1 

$$BATTNY 

1 

$$BATTNZ 

1 

$$BBT3SC 

28 

$$BCBLIS 

16 

$$BCBLOP 

16 

$$BCBODA 

16 

$$BCBUSR 

16 

$$BCBUSW 

16 

$$BCCHHR 

1 

$$BCCPT1 

1 

$$BCE0V1 

1 

$$BCHKPD 

1 

$$BCHKPE 

1 

$$BCHKPF 

1 

$$BCHKPT 

1 

$$BCHKP2 

1 

$$BCIS0A 

1 

$$BCLOSE 

1 

$$BCLOSP 

1 

$$BCLOS2 

1 

$$BCMR01 

7 

$$BCMT01 

1 

$$BCMT02 

1 

$$BCMT03 

1 

$$BCMT04 

1 

$$BCMT05 

1 

$$BCMT06 

1 

$$BCMT07 

1 
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transients, IBM-supplied (CONT.) 


$ $BCOBER 

15 

$ $BCOBRl 

15 

$$BCQC01 

29 

$$BCQC02 

29 

$$BCQC03 

29 

$$BCTC01 

28 

$$BDRSTR 

1 

$$BDUMP 

1 

$$BDUMPB 

1 

$ $BDUMPD 

1 

$$BDUMPF 

1 

$$BENDFF 

1 

$ $BENDFL 

1 

$ $BEOJ 

1 

$$BE0J1 

1 

$$BEOJ2 

1 

$$BEOJ2A 

1 

$$BEOJ3 

1 

$$BEOJ3A 

1 

$$BEOJ4 

1 

$$BEOJ5 

1 

$$BEOJ7 

1 

$$BERPTP 

10 

$$BERRTN 

1 

$$BETPRT 

28 

$ $BFCB 

1 

$$BFCMUL 

15 

$$BHDRCK 

28 

$$BIIQBD 

2 

$$BIIQBS 

2 

$$BIIQMW 

2 

$$BIIQSD 

2 

$$BIIQSS 

2 

$$BIIQT1 

2 

$$BIIQT2 

2 

$$BIIQT3 

2 

$$BIIQT4 

2 

$$BIIQT5 

2 

$$BIIQT6 

2 

$$BIIRBD 

3 

$$BIIRBS 

3 

$$BIIRMW 

3 

$$BIIRSD 

3 

$$BIIRT1 

3 

$$BIIRT2 

3 

$$BIIRT3 

3 

$$BIIRT4 

3 

$$BIIRT5 

3 

$$BIIRT6 

3 

$$BILSVC 

1 

$$BINDEX 

1 

$$BJCOPT 

1 

$$BJC0P1 

1 

$$BLEPRT 

28 

$$BLISTV 

1,31 

$ $BLOPEN 

28 

$$BLSTIO 

1 

$$BLVTOC 

1 

$$BMMR20 

7 

$$BMSGWR 

1 

$$BMU100 

30 

$$BMU200 

30 

$$BMU300 

30 

$$BOCPMl 

1 

$$BOCPM2 

1 

$$BOCPTl 

1 

$$BOCPT2 

1 

$$BOCPT3 

1 


$$BOCP01 1 
$$BOCP02 1 
$$B0CP11 1 

$$BOCP12 1 
$$BODACL 1 
$$BODAIN 1 
$$B0DAI1 1 
$ $B0DA01 1 

$ $B0DA02 1 

$$B0DA03 1 

$$B0DA04 1 

$$B0DAU1 1 
$$BODQUE 1 
$$BODSMW 1 
$$BODSPV 1 
$$BODSPW 1 
$$BOFLPT 1 
$$BOIS01 1 
$ $BOIS02 1 

$$BOIS03 1 
$$BOIS04 1 
$$BOIS05 1 
$ $BOIS06 1 

$$BOIS07 1 
$$BOIS08 1 
$$BOIS09 1 
$$B0IS10 1 

$ $BOLTEP 27 
$$BOMRCE 1 
$$BOMR01 7 

$$B0MSG1 1 
$$BOMSG2 1 
$$B0MSG3 1 
$$B0MSG4 1 
$$B0MSG5 1 
$$BOMSG6 1 
$$B0MSG7 1 
$$BOMTOM 1 
$$BOMTOW 1 
$$BOMT01 1 
$$BOMT02 1 
$$BOMT03 1 
$$BOMT04 1 
$$BOMT05 1 
$$BOMT06 1 
$$BOMT07 1 
$ $BONVOL 1 

$$BOOR01 9 
$ $BOPEN 1 

$$BOPENC 1 
$ $BOPEND 1 

$$BOPENR 1 
$$BOPENl 1 
$$B0PEN2 1 
$$BOPIGN 1 
$$BOPNLB 1 
$$B0PNR2 1 
$$BOQ001 29 

$$BOQO02 29 
$$BOQO03 29 
$$BOQ004 29 

$$BOQ006 29 

$$BOQO07 29 
$$BOQO08 29 
$$B0RTV1 1 
$$B0RTV2 1 
$$B0SDC1 1 
$$BOSDC2 1 
$$BOSDEV 1 
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transients, IBM-supplied (CONT.) 


$$B0SDI1 

1 

$$B0SDI2 

1 

$$B0SDI3 

1 

$$B0SDI4 

1 

$$B0SD01 

1 

$$B0SD02 

1 

$$B0SD03 

1 

$$B0SD04 

1 

$$B0SD05 

1 

$$B0SD06 

1 

$$B0SD07 

1 

$$B0SD08 

1 

$$B0SD09 

1 

$$B0SDW1 

1 

$$B0SDW2 

1 

$$B0SDW3 

1 

$$BOSDOO 

1 

$$BOSD01 

1 

$$BOSIGN 

1 

$$BOTCO1 

28 

$$BOUR01 

1 

$$BOVDMP 

1 

$$BOWDMP 

1 

$$B02321 

1 

$$BPCHK 

1 

$$BPDAID 

1 

$$BPDUMP 

1 

$$BPDUM1 

1 

$$BPLOSE 

22 

$$BPSW 

1 

$ $BQCNCL 

29 

$$BQCNCM 

29 

$$BQHDCK 

29 

$ $BQWTRA 

29 

$$BQWTR1 

29 

$$BQWTR2 

29 

$ $BQWTR3 

29 

$$BQ1030 

29 

$$BQ1050 

29 

$$BQ1060 

29 

$$BQ2260 

29 

$$BQ2740 

29 

$$BRELSE 

1 

$$BRESPL 

28 

$$BRMSG1 

1 

$$BRMSG2 

1 

$$BRSTRB 

1 

$$BRSTRT 

1 

$$BRSTR2 

1 

$$BRSTR3 

1 

$$BRSTR4 

1 

$$BSDRUP 

1 

$$BSETFF 

1 

$$BSETFG 

1 

$$BSETFH 

1 

$$BSETFL 

1 

$$BSETLl 

1 

$$BSETL1 

1 

$$BSOPEN 

27 

$$BSYSWR 

1 

$$BTCNCL 

28 

$$BTERM 

1 

$$BTMEBG 

28 

$$BTOLTP 

27 


translating system dump (CONT.) 

$$BT1030 28 

$$BT1050 28 

$$BT1060 28 

$$BT2260 28 

$$BT2740 28 

$$BT2848 28 

$$BUCB 1 
$$BUFLDR 1 
$$BUFLD2 1 
$$BZTIME 27 
$$RAST01 1 
$$RAST02 1 
$$RAST03 1 
$$RAST04 1 
$$RAST05 1 
$$RAST06 1 
$$RAST07 1 
$$RAST08 1 
$$RAST09 1 
$$RAST10 1 

$$RASTl1 1 

$$RAST12 1 
$$BZTIME 27 
transients 

required 1 
translating system dump 

core image library blocks 1 
linkage edit statements 1 
module names 1 
modules, number of 1 
phase names 1 

phases, number of 1 
TRKHLD 1 
TSWTCH 1 
TWF 12 

two IBM 2311 disk drives 
planning 1 

unprotected supervisor storage 1 
utilities group 1 

(see alternate track assign disk) 
(see card to disk) 

(see card to printer and/or punch) 
(see clear disk) 

(see copy disk to card) 

(see copy disk to disk) 

(see disk to card) 

(see disk to disk) 

(see disk to printer) 

(see initialize disk) 

(see restore card to disk) 

(see VTOC display) 
utilities group 2 

(see card to tape) 

(see copy disk or data cell to tape) 
(see data cell to tape) 

(see disk to tape) 

(see initialize tape) 

(see restore tape to disk or 2321) 
(see tape compare) 

(see tape to card) 

(see tape to data cell) 

(see tape to disk) 

(see tape to printer) 


General Index by Module 421 



utilities group 2 

(see tape to tape) 
utilities group 3 

(see alternate track assign 2321) 
(see clear data cell) 

(see data cell to data cell) 

(see data cell to disk) 

(see data cell to printer) 

(see disk to data cell) 
utility programs (BPS) 1 
utilities (system) 34 

values for communication line group table 
29 

variants of IBM-supplied assemblers 12, 
13 

variants of PL/I (D) 22 

VTOC display 

core image library blocks 1,30 
delete statement 31 
linkage edit statements 31 
module names 31 
modules, number of 1,30,31 
phase names 34 
phases, number of 1,30,31 
WAITM 1 

warning diagnostics 12 
workfile assignments 

for one disk drive system 1 
for one disk drive, three tapes 1 
for two disk drive system 1 
workfile MTMOD 1,*8 
workfile requirements 
ANS* COBOL 1,15 
assembler D 1,12 

assembler F 1,13 

COBOL 1,16 
COBOL LCP 1,18 
FORTRAN (basic) 1,19 
FORTRAN IV 1,20 
linkage editor 1 
PL/I (D) 1,22 

RPG 1,23 


XREF 1 


ZONE 1 
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This sheet is for comments and suggestions about this manual. We would appreciate your 
views, favorable or unfavorable, in order to aid us in improving this publication. This fonn 
will be sent directly to the author's department. Please include your name and address if 
you wish a reply. Contact your IBM branch office for answers to technical questions about 
the system or when requesting additional publications. Thank you. 


Your comments* and suggestions: 


* We would especially appreciate your comments on any of the following topics: 

Clarity of the text Accuracy Index Illustrations Appearance Paper 

Organization of the text Cross-references Tables Examples Printing Binding 
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YOUR COMMENTS, PLEASE . . . 

This manual is part of a library that serves as a reference source for systems analysts, 
programmers and operators of IBM systems. Your answers to the questions on the back of this 
form, together with your comments, will help us produce better publications for your use. Each 
reply will be carefully reviewed by the persons responsible for writing and publishing this 
material. All comments and suggestions become the property of IBM. 


Please note: Requests for copies of publications and for assistance in utilizing your IBM sys¬ 
tem should be directed to your IBM representative or to the IBM sales office serving your 
locality. 
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